(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[    255494,       4731]
NotebookOptionsPosition[    253222,       4661]
NotebookOutlinePosition[    253559,       4676]
CellTagsIndexPosition[    253516,       4673]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{"SetDirectory", "[", 
  RowBox[{"NotebookDirectory", "[", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.585957627170384*^9, 3.5859576542873096`*^9}, 
   3.6031981070274076`*^9}],

Cell[BoxData["\<\"/home/ayonga/research/proxi/proxi_opt/dynamics_embedding\"\>\
"], "Output",
 CellChangeTimes->{{3.585957635396029*^9, 3.5859576547943296`*^9}, 
   3.5861172946700573`*^9, 3.58700453655436*^9, 3.587255258887719*^9, 
   3.5872594791463213`*^9, 3.5873943868265*^9, 3.587398119753325*^9, 
   3.587424768004291*^9, 3.587434353145732*^9, 3.587490827410903*^9, 
   3.587591159111717*^9, 3.588435858815679*^9, 3.5892205128586063`*^9, 
   3.589245003886035*^9, 3.5892957790111856`*^9, 3.5902511147618113`*^9, 
   3.592226976475728*^9, 3.5931030620358458`*^9, 3.593192529890523*^9, 
   3.5967450119674883`*^9, 3.598539193832142*^9, 3.598620789346847*^9, 
   3.598621450011014*^9, 3.598670011755273*^9, 3.600308521851342*^9, 
   3.6003091142472563`*^9, 3.600309304921729*^9, 3.600309988594036*^9, 
   3.600350681963344*^9, 3.600358562396964*^9, 3.600444280123317*^9, 
   3.6005555136696253`*^9, 3.60064043828581*^9, 3.601663762326165*^9, 
   3.601666208316248*^9, 3.602991873572215*^9, 3.6029929117977047`*^9, 
   3.6030338589449873`*^9, 3.603122257501419*^9, 3.603129592187944*^9, 
   3.6031981080104094`*^9, 3.60319847447891*^9, 3.603201304544672*^9, 
   3.603285926428699*^9, 3.603329333251089*^9, 3.603329440983665*^9, 
   3.6033703695993834`*^9, 3.603372737878497*^9, 3.603373754901128*^9, 
   3.603386612693194*^9, 3.603396304613429*^9, 3.603401495144314*^9, 
   3.6034089993436403`*^9, 3.60374945584761*^9, 3.603901045902637*^9, 
   3.606650259952276*^9, 3.607062046293874*^9, {3.607126278884067*^9, 
   3.607126305200572*^9}, 3.6071265542785053`*^9, 3.607130462114459*^9, 
   3.607184077912675*^9, 3.607185233025769*^9, 3.6071856995293703`*^9, 
   3.607185908547703*^9, 3.607219169377758*^9, 3.607250527818283*^9, 
   3.607250571317739*^9, 3.6072507302169533`*^9, 3.6073182075437813`*^9, 
   3.6073201687239447`*^9, 3.607570893182968*^9, 3.607570975822875*^9, 
   3.607571212568622*^9, 3.6076548796448507`*^9, {3.607707214071622*^9, 
   3.607707227707901*^9}, 3.607731761929987*^9, 3.6077318866869307`*^9, 
   3.607784205852915*^9, 3.607784272373599*^9, 3.608252098044195*^9, 
   3.608265044081805*^9, 3.608265350562669*^9, 3.608265573949832*^9, 
   3.608400472868208*^9, 3.608477221471952*^9, 3.608477386690042*^9, 
   3.608643121960649*^9, 3.608643343023027*^9, 3.6086618426581717`*^9, 
   3.608680577659971*^9, 3.6086831842299223`*^9, 3.6086835825516243`*^9, 
   3.6086837426207933`*^9, 3.608683924340308*^9, 3.6089989417793694`*^9, 
   3.609003115836041*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"yd", " ", "=", " ", 
   RowBox[{"Import", "[", 
    RowBox[{"\"\<yd_sim_single.mat\>\"", ",", "\"\<MAT\>\""}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"time", " ", "=", " ", 
   RowBox[{"Import", "[", 
    RowBox[{"\"\<time_sim_single.mat\>\"", ",", "\"\<MAT\>\""}], "]"}]}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.60718564861054*^9, 3.607185662875778*^9}, {
  3.607185763423761*^9, 3.607185769200206*^9}, {3.6084004647212954`*^9, 
  3.608400469497693*^9}, {3.60847737855474*^9, 3.608477383722878*^9}, {
  3.608998934248528*^9, 3.6089989387878513`*^9}, {3.609003109595286*^9, 
  3.6090031136457167`*^9}, {3.609003263629176*^9, 3.609003269174737*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"y1", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "1"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y2", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "2"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y3", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "3"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y4", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "4"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y5", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "5"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y6", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "6"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y7", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "7"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y8", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "8"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y9", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "9"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y10", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", "time", "]"}], "}"}], "]"}], ",", 
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{"Flatten", "[", 
        RowBox[{"yd", "\[LeftDoubleBracket]", 
         RowBox[{"All", ",", "10"}], "\[RightDoubleBracket]"}], "]"}], "}"}], 
      "]"}], ",", "2"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->CompressedData["
1:eJwd0n0s1HEcB/CbVMiQp2wtZI1IiWuyOw/3q+Upj/3jsWaKIfKwZS6RMNPl
qUucmjwUbmhh65obxwqTWchjysM4D/1QN064rPq+f3+89/rr/dk+2/tkZOK1
KDUWi8UlgbyZEG3Ve5oy5jXrwaLZc5ZQtlHN2C2wtoU3cq3Ow81AEw7Ue/bO
GYp+eJjuE5U7TU5wWG/DBS7I8tyg8VrBZRjRHOMBN//4+EGBUhUIVRrCGOhp
vJQJ1R/0C+F8WEolDM3NW2tsp6mA4FkF/GzbpttELOOv60G5BotvJaWpwUj9
e9DWpUYAne80MaZUnCqDSv9lxobQfe5toszQ0Bm2BbHK4YVl9woY2xeycR/9
/SpGRXmcChr1iRnp1/XuGUSztxOM0vzpTBFxi8vLhk9uRmd8wp3G5Ezoofzr
OkDMrwx3gxVbg0vDRJO6aUat37VJI8RZiXcyjE5vr4KdkX2MY5rae1Ed5C/5
YxVs0RYYLnXS1Lb5WWN4qzXZAXoJ7dhQIUjjQKlrFBdO1r4a1ZTRlCTbYAxO
/doZ8emlqbC5wq/wwPA+25eYXZzlBJMuaglDh2iqRCR8Ck1b7M8cGaWpmIQy
W9hlEyw1I0bnfWOc+Vnib04szXEPgGpH0+t8icq042I4W33Vyp+YujXF6G2/
zoEKCz4XKp+3RkEfhWs0DJXTWTBekvgQTg6JF2Ht9yA53ORXdOUQI/TZ3TAw
xmuxepzswihiBb607NuB/Yupu9CxdPNQDVGH0jkM6x0SZqynyM7E4XPQVCHR
jCWWT+wyipabq+KJxWPHquG/VRuTImKAOI0xy+Nuz/ocTZ3YfsOYYqHFOT1P
U9MDH52hBR2nHkv0fBF/EF5nr3yBVybHR6GfI4+3RHTiF1LQJ3noQ9UCTV16
5N4DOboFvQpidsMco9yuY3WPaLC4wvgfQOAe4w==
  "]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"A", "=", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"i", ",", "j"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "1", ",", "10"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"j", ",", "1", ",", "7"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.585958081106435*^9, 3.585958098808715*^9}, 
   3.58739453515522*^9, 3.587424774831748*^9, 3.587592733752982*^9, 
   3.588435866440783*^9, 3.58922084472781*^9, 3.589245009990736*^9, {
   3.5892456292898912`*^9, 3.589245630136839*^9}, {3.589295784953651*^9, 
   3.589295826513214*^9}, 3.596745020649641*^9, 3.598621454352195*^9, {
   3.598670017907339*^9, 3.598670018544874*^9}, {3.6003522674393663`*^9, 
   3.600352268430511*^9}, 3.60035232965585*^9, {3.60035270928012*^9, 
   3.600352709510969*^9}, {3.600352942864135*^9, 3.6003529437043657`*^9}, {
   3.600444783575625*^9, 3.600444783764471*^9}, {3.600447838087824*^9, 
   3.600447838880673*^9}, 3.601663950760701*^9, {3.6029929227082243`*^9, 
   3.602992922909993*^9}, 3.603198113213521*^9, 3.6070620745802813`*^9, {
   3.607062196771469*^9, 3.607062199995863*^9}, {3.607183850045251*^9, 
   3.6071838503578444`*^9}, {3.607316526581065*^9, 3.6073165267342443`*^9}, {
   3.607318176921384*^9, 3.607318177260069*^9}, {3.6075709799537582`*^9, 
   3.607570980210499*^9}, {3.608477253771536*^9, 3.608477254379283*^9}, 
   3.608643128608148*^9, {3.608661863664319*^9, 3.608661863745524*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"2", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"3", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"4", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"5", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"6", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"7", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"8", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"9", ",", "7"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "1"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "2"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "3"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "4"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "5"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "6"}], "]"}], ",", 
     RowBox[{"a", "[", 
      RowBox[{"10", ",", "7"}], "]"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.58595809953638*^9, 3.585960172979169*^9, 3.5861181578713408`*^9, 
   3.587004554003035*^9, 3.5872552647120028`*^9, 3.5872594836952744`*^9, 
   3.587259578159322*^9, 3.587394536879203*^9, 3.587398140226163*^9, 
   3.5873983247956457`*^9, 3.587424900270577*^9, 3.5874343606751213`*^9, 
   3.587434456390872*^9, 3.587490837070298*^9, 3.587591163744751*^9, 
   3.587592734461771*^9, 3.587607437986804*^9, 3.588435867166964*^9, 
   3.589220845660254*^9, 3.589245010523777*^9, 3.589245630606292*^9, {
   3.589295794387349*^9, 3.589295827200739*^9}, 3.590251121286718*^9, 
   3.592226988489586*^9, 3.593103065713283*^9, 3.5931925375635033`*^9, 
   3.5931926418930683`*^9, 3.596745021402775*^9, 3.598539198747528*^9, 
   3.598620792632901*^9, 3.598621454828658*^9, 3.598670018947735*^9, 
   3.600308525232041*^9, 3.600308584842971*^9, 3.6003091185117493`*^9, 
   3.600309308097026*^9, 3.60030999187885*^9, 3.600350687359356*^9, {
   3.60035226900856*^9, 3.60035229209662*^9}, 3.600352330592649*^9, 
   3.600352710144109*^9, 3.6003529443696012`*^9, 3.600358566078128*^9, 
   3.600444284598569*^9, 3.60044478426864*^9, 3.600446250266773*^9, 
   3.600447839359561*^9, 3.600448525650324*^9, 3.600555523953315*^9, 
   3.60064044147547*^9, 3.601663943486209*^9, 3.60166405931448*^9, 
   3.601666211416325*^9, 3.6029918785485573`*^9, 3.602992915589958*^9, 
   3.6029931554601316`*^9, 3.6030338624587584`*^9, 3.603122261873013*^9, 
   3.6031296034255133`*^9, 3.603129695791884*^9, 3.603198114176033*^9, 
   3.603198149948105*^9, 3.603198479944993*^9, 3.6032013074918222`*^9, 
   3.603285928626021*^9, 3.603329335687233*^9, 3.6033294426220417`*^9, 
   3.603370371624071*^9, 3.603372739408626*^9, 3.603373756868664*^9, 
   3.603386614963738*^9, 3.603396306453803*^9, 3.603401497367503*^9, 
   3.603409001324897*^9, 3.6037494576688433`*^9, 3.603901048412408*^9, 
   3.606650263368775*^9, 3.6070622003925447`*^9, {3.607126278978425*^9, 
   3.607126305258165*^9}, 3.607126554365662*^9, 3.607130462168367*^9, 
   3.607184080959269*^9, 3.607185233227222*^9, 3.6071856996792793`*^9, 
   3.607185908659338*^9, 3.6072191823320303`*^9, 3.6072505282844057`*^9, 
   3.6072505714603767`*^9, 3.607250730395515*^9, 3.607318207681491*^9, 
   3.6073201689042892`*^9, 3.6075709805877037`*^9, 3.607571215190646*^9, 
   3.607654882465176*^9, {3.6077072143989353`*^9, 3.607707227785112*^9}, 
   3.607731762006728*^9, 3.60773188675521*^9, 3.607784206152721*^9, 
   3.607784272630301*^9, 3.6082521015043707`*^9, 3.608265044240982*^9, 
   3.608265350657572*^9, 3.6082655740465403`*^9, 3.608400480285397*^9, 
   3.6084772552824163`*^9, 3.608477389554872*^9, 3.608477654720759*^9, {
   3.608643124705398*^9, 3.608643129094577*^9}, 3.6086433471077414`*^9, 
   3.60866184288019*^9, {3.6086618770980377`*^9, 3.6086618813887987`*^9}, 
   3.608680577961525*^9, 3.608683184455233*^9, 3.6086835828047867`*^9, 
   3.608683742832472*^9, 3.608683924534676*^9, 3.60899897901796*^9, 
   3.60899947079318*^9, 3.609003142384623*^9, 3.609003271380871*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"yModelCWF", "[", "i_", "]"}], " ", "=", " ", 
   RowBox[{"Function", "[", 
    RowBox[{
     RowBox[{"{", "t", "}"}], ",", 
     RowBox[{
      FractionBox[
       RowBox[{
        RowBox[{
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "1"}], "]"}], " ", 
         RowBox[{"Cos", "[", 
          RowBox[{
           RowBox[{"a", "[", 
            RowBox[{"i", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}], "+", 
        RowBox[{
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "3"}], "]"}], " ", 
         RowBox[{"Sin", "[", 
          RowBox[{
           RowBox[{"a", "[", 
            RowBox[{"i", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}]}], 
       RowBox[{"Exp", "[", 
        RowBox[{
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "4"}], "]"}], " ", "*", "t"}], "]"}]], "+", 
      RowBox[{
       RowBox[{"a", "[", 
        RowBox[{"i", ",", "5"}], "]"}], " ", 
       RowBox[{"Cos", "[", 
        RowBox[{
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "6"}], "]"}], "*", "t"}], "]"}]}], "+", 
      RowBox[{
       FractionBox[
        RowBox[{"2", "*", 
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "4"}], "]"}], "*", 
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "5"}], "]"}], "*", 
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "6"}], "]"}]}], 
        RowBox[{
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"i", ",", "4"}], "]"}], "^", "2"}], "+", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"i", ",", "2"}], "]"}], "^", "2"}], "-", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"i", ",", "6"}], "]"}], "^", "2"}]}]], 
       RowBox[{"Sin", "[", 
        RowBox[{
         RowBox[{"a", "[", 
          RowBox[{"i", ",", "6"}], "]"}], "*", "t"}], "]"}]}], "+", 
      RowBox[{"a", "[", 
       RowBox[{"i", ",", "7"}], "]"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.585959168054742*^9, 3.5859591825031757`*^9}, {
  3.585959311909533*^9, 3.585959357860889*^9}, {3.587394415502502*^9, 
  3.587394526568337*^9}, {3.6016639547144213`*^9, 3.601663956368362*^9}, {
  3.6029929277129087`*^9, 3.6029929755006638`*^9}, {3.6070620816299047`*^9, 
  3.607062084770926*^9}, {3.607062191450441*^9, 3.607062193709073*^9}, {
  3.6071838990380297`*^9, 3.607183979960785*^9}, {3.6076548470475407`*^9, 
  3.607654848007081*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"yModelBezier", "[", "j_", "]"}], " ", "=", 
   RowBox[{
    RowBox[{"Function", "[", 
     RowBox[{
      RowBox[{"{", "t", "}"}], ",", 
      RowBox[{"Sum", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"a", "[", 
          RowBox[{"j", ",", 
           RowBox[{"i", "+", "1"}]}], "]"}], "*", 
         RowBox[{"Binomial", "[", 
          RowBox[{"N", ",", "i"}], "]"}], "*", 
         RowBox[{"t", "^", "i"}], "*", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "-", "t"}], ")"}], "^", 
          RowBox[{"(", 
           RowBox[{"N", "-", "i"}], ")"}]}]}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "0", ",", "N"}], "}"}]}], "]"}]}], "]"}], "/.", 
    RowBox[{"{", 
     RowBox[{"N", "\[Rule]", " ", "6"}], "}"}]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.607654840980997*^9, 3.607654864661141*^9}, {
  3.607707197422213*^9, 3.607707207982607*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"yModelBezier", "[", "1", "]"}], "[", "t", "]"}]], "Input",
 CellChangeTimes->{{3.6071839828888187`*^9, 3.6071840009795523`*^9}, {
  3.6076548899164047`*^9, 3.607654890971788*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"1", "-", "t"}], ")"}], "6"], " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "1"}], "]"}]}], "+", 
  RowBox[{"6", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"1", "-", "t"}], ")"}], "5"], " ", "t", " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "2"}], "]"}]}], "+", 
  RowBox[{"15", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"1", "-", "t"}], ")"}], "4"], " ", 
   SuperscriptBox["t", "2"], " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "3"}], "]"}]}], "+", 
  RowBox[{"20", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"1", "-", "t"}], ")"}], "3"], " ", 
   SuperscriptBox["t", "3"], " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "4"}], "]"}]}], "+", 
  RowBox[{"15", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"1", "-", "t"}], ")"}], "2"], " ", 
   SuperscriptBox["t", "4"], " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "5"}], "]"}]}], "+", 
  RowBox[{"6", " ", 
   RowBox[{"(", 
    RowBox[{"1", "-", "t"}], ")"}], " ", 
   SuperscriptBox["t", "5"], " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "6"}], "]"}]}], "+", 
  RowBox[{
   SuperscriptBox["t", "6"], " ", 
   RowBox[{"a", "[", 
    RowBox[{"1", ",", "7"}], "]"}]}]}]], "Output",
 CellChangeTimes->{{3.6071839867689123`*^9, 3.607184001566964*^9}, 
   3.60718408323429*^9, 3.607185233295547*^9, 3.6071856997445393`*^9, 
   3.607185908711149*^9, 3.607219185039343*^9, 3.607250528329648*^9, 
   3.607250571503562*^9, 3.6072507304488697`*^9, 3.607318207748192*^9, 
   3.6073201689636917`*^9, 3.607654891300969*^9, {3.607707214507594*^9, 
   3.607707227830405*^9}, 3.607731762039379*^9, 3.607731886799945*^9, 
   3.607784206237591*^9, 3.607784272742345*^9, 3.608265044285141*^9, 
   3.6082653506984053`*^9, 3.608265574073896*^9, 3.608661842948428*^9, 
   3.608680578059308*^9, 3.608683184545485*^9, 3.608683582903152*^9, 
   3.608683742902318*^9, 3.608683924599807*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"y1Model", " ", "=", " ", 
    RowBox[{"Function", "[", 
     RowBox[{
      RowBox[{"{", "t", "}"}], ",", 
      RowBox[{
       FractionBox[
        RowBox[{
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"1", ",", "1"}], "]"}], " ", 
          RowBox[{"Cos", "[", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"1", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}], "+", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"1", ",", "3"}], "]"}], " ", 
          RowBox[{"Sin", "[", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"1", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}]}], 
        RowBox[{"Exp", "[", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"1", ",", "4"}], "]"}], " ", "*", "t"}], "]"}]], "+", 
       RowBox[{"a", "[", 
        RowBox[{"1", ",", "5"}], "]"}]}]}], "]"}]}], ";", 
   "\[IndentingNewLine]", 
   RowBox[{"y2Model", " ", "=", 
    RowBox[{"Function", "[", 
     RowBox[{
      RowBox[{"{", "t", "}"}], ",", 
      RowBox[{
       FractionBox[
        RowBox[{
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"2", ",", "1"}], "]"}], " ", 
          RowBox[{"Cos", "[", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"2", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}], "+", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"2", ",", "3"}], "]"}], " ", 
          RowBox[{"Sin", "[", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"2", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}]}], 
        RowBox[{"Exp", "[", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"2", ",", "4"}], "]"}], " ", "*", "t"}], "]"}]], "+", 
       RowBox[{"a", "[", 
        RowBox[{"2", ",", "5"}], "]"}]}]}], "]"}]}], ";", 
   "\[IndentingNewLine]", 
   RowBox[{"y3Model", " ", "=", 
    RowBox[{"Function", "[", 
     RowBox[{
      RowBox[{"{", "t", "}"}], ",", 
      RowBox[{
       FractionBox[
        RowBox[{
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"3", ",", "1"}], "]"}], " ", 
          RowBox[{"Cos", "[", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"3", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}], "+", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"3", ",", "3"}], "]"}], " ", 
          RowBox[{"Sin", "[", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"3", ",", "2"}], "]"}], " ", "*", "t"}], "]"}]}]}], 
        RowBox[{"Exp", "[", 
         RowBox[{
          RowBox[{"a", "[", 
           RowBox[{"3", ",", "4"}], "]"}], " ", "*", "t"}], "]"}]], "+", 
       RowBox[{"a", "[", 
        RowBox[{"3", ",", "5"}], "]"}]}]}], "]"}]}], ";"}], "*)"}]], "Input",
 CellChangeTimes->{{3.607062090154688*^9, 3.6070621045089083`*^9}, {
  3.607126290768179*^9, 3.60712629343801*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"y1Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y1", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "1", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"1", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], "]"}]}], "\n", 
 RowBox[{"y2Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y2", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "2", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"2", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y3Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y3", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "3", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"3", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y4Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y4", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "4", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"4", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y5Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y5", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "5", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"5", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}], ",", 
    RowBox[{"Method", "\[Rule]", " ", "NMinimize"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y6Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y6", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "6", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"6", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y7Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y7", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "7", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"7", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y8Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y8", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "8", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"8", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y9Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y9", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "9", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"9", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"y10Fit", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"y10", ",", 
    RowBox[{
     RowBox[{"yModelCWF", "[", "10", "]"}], "[", "t", "]"}], ",", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"10", ",", "i"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", "t", ",", 
    RowBox[{"MaxIterations", "\[Rule]", "100000000"}]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.600358714589222*^9, 3.600358774334429*^9}, 
   3.6004482367492647`*^9, 3.60044826915458*^9, {3.6004483132593517`*^9, 
   3.600448314252494*^9}, {3.60044835801073*^9, 3.600448358198923*^9}, 
   3.600448492228387*^9, {3.600555662694261*^9, 3.6005556630063047`*^9}, 
   3.60166396793723*^9, {3.6029929930525293`*^9, 3.602993015678581*^9}, {
   3.602993049609692*^9, 3.602993050145711*^9}, {3.607062116015128*^9, 
   3.607062140183035*^9}, {3.607062207753346*^9, 3.607062211544261*^9}, {
   3.6071840277198477`*^9, 3.6071840644720707`*^9}, {3.607184174416337*^9, 
   3.607184174807425*^9}, {3.6073165306431007`*^9, 3.6073165465905437`*^9}, {
   3.6073181831315603`*^9, 3.6073181957711554`*^9}, {3.607570988351939*^9, 
   3.607571012735672*^9}, 3.6075710485996933`*^9, {3.607654899459908*^9, 
   3.607654929987389*^9}, {3.607707192017668*^9, 3.607707194583003*^9}, {
   3.607784225327613*^9, 3.607784269914851*^9}, {3.608400503958865*^9, 
   3.6084005099345713`*^9}, {3.608477266759515*^9, 3.6084772940839252`*^9}, {
   3.608477439379678*^9, 3.6084774433209352`*^9}, {3.6084775825063133`*^9, 
   3.608477594887847*^9}, {3.608643135568678*^9, 3.608643138394587*^9}, {
   3.608661832894334*^9, 3.608661834264862*^9}, {3.608999553697863*^9, 
   3.608999554006227*^9}, {3.609003155799412*^9, 3.609003158149785*^9}, {
   3.609003323892864*^9, 3.609003324136363*^9}, {3.609003537336872*^9, 
   3.6090035435886393`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "1"}], "]"}], "\[Rule]", "0.002027850685827307`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "2"}], "]"}], "\[Rule]", "23.605218486797533`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "3"}], "]"}], "\[Rule]", "0.0017798880461647295`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "4"}], "]"}], "\[Rule]", "5.237812329450779`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "5"}], "]"}], "\[Rule]", "0.0005493108499327397`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "6"}], "]"}], "\[Rule]", 
    RowBox[{"-", "7.904971130922698`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"1", ",", "7"}], "]"}], "\[Rule]", "0.9698223149534997`"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.6090035453691273`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "1"}], "]"}], "\[Rule]", 
    RowBox[{"-", "1.9210543609884403`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "2"}], "]"}], "\[Rule]", "0.002856814765540601`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "3"}], "]"}], "\[Rule]", "9058.425963267724`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "4"}], "]"}], "\[Rule]", "18.024688448210423`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "5"}], "]"}], "\[Rule]", "0.1381134939175042`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "6"}], "]"}], "\[Rule]", "5.287284439826944`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"2", ",", "7"}], "]"}], "\[Rule]", "1.427562478202818`"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003552411241*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "1"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.05807509111938516`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "2"}], "]"}], "\[Rule]", 
    RowBox[{"-", "21.80719942437296`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "3"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.0005208958559773361`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "4"}], "]"}], "\[Rule]", "0.5028284409461409`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "5"}], "]"}], "\[Rule]", "0.327265882985767`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "6"}], "]"}], "\[Rule]", 
    RowBox[{"-", "4.6275103431207787`*^-10"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"3", ",", "7"}], "]"}], "\[Rule]", "0.6273359510895652`"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.6090035524441338`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "1"}], "]"}], "\[Rule]", "13.785184495417743`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "2"}], "]"}], "\[Rule]", "0.0015002739831083893`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "3"}], "]"}], "\[Rule]", 
    RowBox[{"-", "82633.15032069015`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "4"}], "]"}], "\[Rule]", "18.14728251582313`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "5"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.15081366584207895`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "6"}], "]"}], "\[Rule]", "6.568132155783723`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"4", ",", "7"}], "]"}], "\[Rule]", "1.7936836268221623`"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003560977895*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "1"}], "]"}], "\[Rule]", "1.0582500719229313`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "2"}], "]"}], "\[Rule]", "1.1403330196902193`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "3"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.8580369276183655`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "4"}], "]"}], "\[Rule]", 
    RowBox[{"-", "1.5251665925878324`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "5"}], "]"}], "\[Rule]", "0.003843743844876461`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "6"}], "]"}], "\[Rule]", "1.9181432088777877`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"5", ",", "7"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.8154101182238451`"}]}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.6090035632254963`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"FindFit", "::", "sszero"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"The step size in the search has become less than the \
tolerance prescribed by the PrecisionGoal option, but the gradient is larger \
than the tolerance specified by the AccuracyGoal option. There is a \
possibility that the method has stalled at a point that is not a local \
minimum. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\
\", ButtonFrame->None, ButtonData:>\\\"paclet:ref/FindFit\\\", ButtonNote -> \
\\\"FindFit::sszero\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.608999559079752*^9, 3.6090031733564663`*^9, 
  3.609003278787483*^9, 3.609003529506777*^9, 3.609003564489758*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "1"}], "]"}], "\[Rule]", "76.92213101783746`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "2"}], "]"}], "\[Rule]", "0.007554662059343148`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "3"}], "]"}], "\[Rule]", 
    RowBox[{"-", "98675.36229661653`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "4"}], "]"}], "\[Rule]", "20.536810227708415`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "5"}], "]"}], "\[Rule]", "138156.48049743177`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "6"}], "]"}], "\[Rule]", "0.015953588737225008`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"6", ",", "7"}], "]"}], "\[Rule]", 
    RowBox[{"-", "138154.54556169952`"}]}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003564491016*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "1"}], "]"}], "\[Rule]", "0.0002909299285266762`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "2"}], "]"}], "\[Rule]", "7.2723671890185475`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "3"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.0011715979142446454`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "4"}], "]"}], "\[Rule]", "6.269432581747748`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "5"}], "]"}], "\[Rule]", "3.3132869711431545`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "6"}], "]"}], "\[Rule]", "0.03414912849563322`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"7", ",", "7"}], "]"}], "\[Rule]", 
    RowBox[{"-", "3.3629663511485774`"}]}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003567224546*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "1"}], "]"}], "\[Rule]", "2.1116033871661493`*^-15"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "2"}], "]"}], "\[Rule]", "33.83516458453712`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "3"}], "]"}], "\[Rule]", 
    RowBox[{"-", "1.1877787185148508`*^-15"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "4"}], "]"}], "\[Rule]", "6.430817433821772`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "5"}], "]"}], "\[Rule]", "3.358747623641173`*^-8"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "6"}], "]"}], "\[Rule]", "0.0022842911415912265`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"8", ",", "7"}], "]"}], "\[Rule]", 
    RowBox[{"-", "3.358747959452097`*^-8"}]}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003568592246*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"FindFit", "::", "sszero"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"The step size in the search has become less than the \
tolerance prescribed by the PrecisionGoal option, but the gradient is larger \
than the tolerance specified by the AccuracyGoal option. There is a \
possibility that the method has stalled at a point that is not a local \
minimum. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\
\", ButtonFrame->None, ButtonData:>\\\"paclet:ref/FindFit\\\", ButtonNote -> \
\\\"FindFit::sszero\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.608999559079752*^9, 3.6090031733564663`*^9, 
  3.609003278787483*^9, 3.609003529506777*^9, 3.609003572272377*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "1"}], "]"}], "\[Rule]", "4.920740174954576`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "2"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.6997370657985432`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "3"}], "]"}], "\[Rule]", "3.5036556626480717`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "4"}], "]"}], "\[Rule]", "3.400190702657514`*^-7"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "5"}], "]"}], "\[Rule]", 
    RowBox[{"-", "4.920851100247304`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "6"}], "]"}], "\[Rule]", "0.699737543361382`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"9", ",", "7"}], "]"}], "\[Rule]", "0.00011820302302050764`"}]}],
   "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003572273539*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "1"}], "]"}], "\[Rule]", "2.230892327133782`"}], ",", 
   
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "2"}], "]"}], "\[Rule]", 
    RowBox[{"-", "0.006457259320056658`"}]}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "3"}], "]"}], "\[Rule]", "2347.9980825420353`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "4"}], "]"}], "\[Rule]", "22.492236103564718`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "5"}], "]"}], "\[Rule]", "277.98735999134186`"}], ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "6"}], "]"}], "\[Rule]", "0.011919283871488454`"}], 
   ",", 
   RowBox[{
    RowBox[{"a", "[", 
     RowBox[{"10", ",", "7"}], "]"}], "\[Rule]", 
    RowBox[{"-", "277.9843427170788`"}]}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.60035264195198*^9, 3.600444565044276*^9, 3.6004447429111156`*^9, 
   3.6004477737427397`*^9, 3.60044784573339*^9, {3.600448232399479*^9, 
   3.6004482402798367`*^9}, 3.600448272023992*^9, 3.600448317203236*^9, 
   3.600448361989304*^9, 3.600448495128327*^9, 3.600448533640329*^9, 
   3.600449323612276*^9, 3.6005555308285007`*^9, 3.600555666256301*^9, 
   3.6006404482404137`*^9, 3.601663973652508*^9, 3.601664064845743*^9, 
   3.6016662177882977`*^9, 3.6029918854656982`*^9, 3.602993019028369*^9, 
   3.602993052722847*^9, 3.603033868903491*^9, 3.603122272623829*^9, 
   3.603129607405643*^9, {3.6031297008504877`*^9, 3.603129719120879*^9}, 
   3.603198123085956*^9, 3.603198154185766*^9, 3.603198482891842*^9, 
   3.603201311216896*^9, 3.603285931827726*^9, 3.603329338464076*^9, 
   3.603329446495944*^9, 3.603370374771805*^9, 3.603372743174695*^9, 
   3.603373759362028*^9, 3.60338661724292*^9, 3.603396308900613*^9, 
   3.603401500578437*^9, 3.60340900466245*^9, 3.603749463847027*^9, 
   3.6039010546588573`*^9, 3.6066502687296963`*^9, 3.607062141391425*^9, 
   3.607062212717833*^9, {3.607126280134824*^9, 3.6071263068899937`*^9}, 
   3.607126556365512*^9, 3.6071304640791407`*^9, {3.607184066000875*^9, 
   3.607184087015798*^9}, 3.607184177496421*^9, 3.607185238412735*^9, 
   3.607185700061061*^9, 3.607185908769912*^9, 3.6072191939793463`*^9, 
   3.607250528386483*^9, 3.607250571546145*^9, 3.6072507304986057`*^9, 
   3.6073182078087797`*^9, 3.607320169018444*^9, 3.607571013765884*^9, 
   3.6075710502390957`*^9, 3.607571102864229*^9, 3.6075712198477716`*^9, {
   3.607654908998191*^9, 3.607654932277544*^9}, {3.607707216593072*^9, 
   3.607707230712538*^9}, 3.6077317620801573`*^9, 3.6077318869028053`*^9, 
   3.6077842063910646`*^9, 3.607784274727427*^9, 3.608252106073278*^9, 
   3.6082650454545403`*^9, 3.608265351776815*^9, 3.608265575206707*^9, {
   3.608400483352507*^9, 3.608400511809545*^9}, 3.60847730139473*^9, 
   3.608477393123537*^9, 3.608477445490247*^9, {3.608477584355812*^9, 
   3.608477596952509*^9}, 3.608477627933566*^9, 3.608477659200151*^9, 
   3.608643140959588*^9, 3.608643351751493*^9, 3.608661844592701*^9, 
   3.608680579717369*^9, 3.6086831862085667`*^9, 3.6086835841925697`*^9, 
   3.6086837444386187`*^9, 3.608683925768861*^9, 3.608998983857482*^9, 
   3.608999474467668*^9, 3.608999560264737*^9, 3.6090031636991262`*^9, 
   3.609003278789406*^9, 3.609003327188118*^9, 3.609003573571685*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y1", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "1", "]"}], "[", "t", "]"}], "/.", "y1Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y2", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "2", "]"}], "[", "t", "]"}], "/.", "y2Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y3", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "3", "]"}], "[", "t", "]"}], "/.", "y3Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y4", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "4", "]"}], "[", "t", "]"}], "/.", "y4Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y5", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "5", "]"}], "[", "t", "]"}], "/.", "y5Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y6", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "6", "]"}], "[", "t", "]"}], "/.", "y6Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y7", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "7", "]"}], "[", "t", "]"}], "/.", "y7Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y8", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "8", "]"}], "[", "t", "]"}], "/.", "y8Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y9", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "9", "]"}], "[", "t", "]"}], "/.", "y9Fit"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", "y10", "]"}], ",", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"yModelCWF", "[", "10", "]"}], "[", "t", "]"}], "/.", 
      "y10Fit"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.586123113143156*^9, 3.586123141370345*^9}, {
   3.5861232567325583`*^9, 3.586123256889645*^9}, {3.587004460189575*^9, 
   3.587004486642921*^9}, {3.589220873602208*^9, 3.5892208932012177`*^9}, {
   3.59674506873836*^9, 3.596745088435472*^9}, {3.600308638694771*^9, 
   3.600308641915221*^9}, {3.600309176004779*^9, 3.600309202546281*^9}, {
   3.600309432021481*^9, 3.600309438052548*^9}, {3.600310023525724*^9, 
   3.6003100237643747`*^9}, {3.6004484748820543`*^9, 3.600448475376296*^9}, 
   3.600448554205851*^9, {3.600640457180818*^9, 3.60064046590351*^9}, {
   3.601663983054351*^9, 3.6016639973264*^9}, {3.602993027659336*^9, 
   3.602993034464389*^9}, {3.602993080444805*^9, 3.602993082729401*^9}, {
   3.60299311531746*^9, 3.602993127383231*^9}, {3.607184108710326*^9, 
   3.6071841413486233`*^9}, {3.6073165510031023`*^9, 3.607316557807147*^9}, {
   3.6075712290901337`*^9, 3.60757124291857*^9}, {3.6076549133964243`*^9, 
   3.607654918949046*^9}, {3.607707195374794*^9, 3.607707197162372*^9}, {
   3.6084773090774717`*^9, 3.608477324166071*^9}, {3.6086431459682703`*^9, 
   3.608643149477916*^9}, {3.6086618369864388`*^9, 3.608661839054946*^9}, {
   3.608999012398843*^9, 3.60899903206488*^9}, {3.608999554060237*^9, 
   3.608999554242364*^9}, {3.609003158185192*^9, 3.6090031582276487`*^9}}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwV1nk0FF4UB3DZskZosZRdKlS0SHKzhJAtSRFC0mYrW1QoSkn2JEQUpUUU
P5UiYxvbjNkHSUS2RkhE/K4/3nnn88c7753zzr33q+jhZ3+Sm4uLqwnX0p55
4X7ceGktqDxNtzZdxgH5kD/XNL7UwkxNscySCy4dvuIjSACvlOyrZuhNV8pC
C7YTgOx1t98c/Spq5YWvbgRIdSySs0Rvj/E7L3ebAF3RGYK26Mqbraecygmg
/urmtAMa4jd7pPYS4NnV+WhnNOFunAtJpA6W1etqeqEPpAw6iujWgZNIEOMc
ui19v525Zx141PSMhKAdMvMtryfUQbnVmuHraFb2MtPqyjoQYVr/SEK75rnt
m++vg06ewYJcdF9BlZ6ueD2AYmpOKdqnSHbHxT31kG9gmEFA/ywO21LiXQ/L
XX4m0dEXXjE2jibVA/FGgMYYeqZ0h4p6VT0s/k2l83Bz4HJ5ynqvH/VwcKvR
tCya+92vtbmSDZA9uDxoJ/pmlY1kl0EDrPgZdsQOLVrzQnTtmQa4axqzwQ+d
TBAWcEhrANmuLuk76LWNp7kTqxvA6QKJ9gKd3dww3zzSACz9bbQ2tFK76p/l
axrB9YWg6gS6sOPaL2OjRuhQM+RezcMBDXrvyNXzjcBOTr63B13KgoH3GY1w
Y2yvsAd6V3f21z+1jRAnxsmJQ3/4OsfW4TRCtMq8QynasP8ozU+mCQazdz/u
RNcPVrQX72+CoR1fjfl5OWA1soo46N8ECX0Cm7ehyT8vEJSzmiB5YhCOox0n
yB/dGprAtVInLg7d9XtL5YOJJmhtTywuR7vP3iljrCMCKWp2rA89MD/yQvIA
ESJ6yLUr+ThwlsuiyOYiEWLlrfj3ocd5ih7dfkiEWR4ZR1908HL+7AYiEcJC
Dg9loeeEvO7xTBNhlNKa0oyOXPE5CRSbYX5Gx/ovmk9CIT7cqhkWOh/lq/Nz
4NaqK7EVIc1gvcv4jyNaXLorcvJRM+Qk91nEoNPk9MK3tDXDz7FrOWVoGYWM
oLOzzWBwQGWiF52rPO1XqNICCQWE/eLLOaCyweFMn00LRJeti9VHP9tU6iUf
3gIMz6Q8H/QWLXE35yctsFmKryoV/Wab79F75BaIJIQyq9F6O1oOUeZbgHZx
dHIU/VF3k7WYeitsUnUXkxbggIn+TXPLQ61w2YxcYohuggGjG1daIb3idvFp
tLWxyd7ap61QssH0SRKaavpo1yK1FZruceVVoo9acGnv4WqDvuXvH/Sivxx0
1QjZ3AbzIUHpgoIc8LL7oFbm2AYCbYVpmugfDjKKnKg2CJYkkW3Qvk6hsptf
tEG/04xoIHrSmb7qFLMN7HMULFLRoW7bxfN52qG6zzy2HL3gkSzUo9UOWhsD
PjPR0d7jvLLH2iGZYZz3By1wxnrRMaYdFPTq6BJCHLhz/vlsckk7PMsyFdFC
SwQITbV1tsOuxQbDA2grve0hMTwkIJw4EOKFXqHveVFZmgS2BOLzq2jy3uSA
Gi0SRBvud72PToUaXzcTEuwsHM57jnY0HD/77ygJhkUSv39CSxvLn37gR4Ks
wB0bKeguE2vv3TEksGGyzw2gc0wvezIyScBtEFkyiz5h/tw9qIQE5fmqUyLC
HFC26DwuWU+Cvf/0DKTRA5ZCzq87SWDuL8qngi46uNvJ5he+r6+nWQt91sbn
8Bg/GY45libvRmvZ3bO/LUcGz6brR03Q4/b1Nhu1yXBe/4iCDbrM4bdVgxkZ
HLQiqxzRwY4qFiePk2FPc2WXE1rX6ZAZzwUyqPhMzh1Dzx2NNsm7SQYRPk3Z
4+iPzq8NIYcMU3neem7oyONfDbrLyNBlkHv0BNrYTUw/vIkMtZ2sUE80/wmD
3dI9ZMjanPDaHd3ocX5nxRQZRj1i2l3Qt7yydA4LdcCfWtv4pfsPejdvnZTv
gPWzo/vt0OI+fzWTdnSAuVbc4gF0x+mNm7dYdkCkbFaKITr9rJN6q3sHaMlG
uO5CO52/oXo2uAOcUxw/aaBl/MqVBOM7QKPA1lMB3e3/Xb4wrwMytbj8JNC5
gVLr9ld0QJi+8lpetMdFY5m+lg6YNjm8Zgr/RzU4cE3Utw6gley+1of+EZIn
JT/TAYdMH94lo5+FkVZWiVLAZrIz7SP6fPjiCmdlClD8E+4Uo7de1hKZ1aVA
epMfJw09ceW44D1rChxTsrOLRL+NjOff4UWBdeHaZWfQIdHveShhFNhWHQj2
aL3rw1wBdykw1fu+cDd6PkZ6YcVjClTw8Ikroj/dMJ97/o4CYarWoQLo6LiQ
GQsSBTJcQuTGsB5Mbj/5/eM7Bb4o08vJ6OV3aBOxcxRQGtlut1RPxATecZWV
VMjpviOWiY5P1Bn7rEaFd9tz3SPQNskew+76VGDeLn3tipZITRpcsKPC1DcC
tyGamlbdn3WKCuG2QfOK6PR7nF69y1T4FmYSwI0+en99DzOZChb5kgPfsD/I
PTjYFVxEBRv/ofHPS/0iK4Il9ZEKx3q5OXnovJxieimFCift5cYi0V65bIrt
EBX8a3eMuKHVHgmSfy7g+ZRyHgP0UL5uW7wUDTKZ59iy6OePTzVv2kSDb+uU
X89iv/MtTG9sBBr4b+NcZaC3Pa2r8z5Mg8a8t5ffoCefTX3mPUsDJYmI8CR0
+XPl6keRNLgUbRTmiw59aV+1L50GlAmBEEv0npKod1+KaRDdrrlPHb3wuqQi
ooYGpcKjXbzo6rKeNzIMGvSZPQtb6ufX3q4o/W+UBpLXfVZ/RJtW7H3lyE0H
k2q1sky0QOW551Nr6PAwf01ICLr53YOnyZp0sNW+aeSATvhAfLLVmA68NTOi
29C2H2fz25zo8NbmNEsULVmtnnfOlw6Xez9pj+A8otUcyRG6TodALu78RnRG
beyDovt08JI3kXyCPlb3NsP0FR0cDWKvXUOva+hP6yfQQe6EFv0E+mujZEo0
mw6UwSm3pfn4iGiUqDBOh1u+74fWo0+2BNz5yMcAo99RF/7hfFVvy73lIsuA
eL7wZd3o4fb2G3+3MsDRUX/uA/oFeeF6hikDlAr/TWWh/Sma0TtdGOCutEf8
Mlqb5nKVGsCAbmF444r+Tb8dEXiDAc6/jZz2oSuY78LEsxnA+mI6r4i+xB4K
flnKgG8Bqr950fpday9aNTJAu1yNewjzxGK3WcBwNwMi/24Qa0V/7gn2vTnJ
AJLBRrnX6Ou9j8+qCTJh/bVNG9PQZn1UH8J6JlRlKmiEo4W+83h7bGeCv6Kl
jSe6ZUDbk8uCCSpFQYGW6Ls/TrjnuDGBrZWbpoO2H048rh/EhIS3xP9k0VKj
n46xbzHBUP93Jw+aMfbzSGguE6Y/yy+OYJ66z1l3eHU5E7au4jKho11+Wdm/
aWbCvGbJdC16/WS4jX0vE4im7k9fo3unnlmNTzMh3U3c5SG6YJp1IEGEBR6h
1SuW8pz3jICZhhILtiT511xCb/y7y4S4iwXzTxUu+qBH57wNfQ6yICfK3t8J
/fJfmgG/Jwu6D+kwLNEBi4Q9BaEskFOTMgC0zrIpXaMEFjjPTBVoo6e5lXd+
zWdBJpEmrIau5LXXuVLJAmZWeaA0Opw/aqtcOwsSJXRUxdEGAiWa7/pZ8PK/
BSlBNJdQzyanvyxocSXycqNrhVeoT4uxYZg3feov5t1Y0b2qqapsECw+0T+J
Nhc7p6S9hw3qdprUUbTwygfyJFs2xDhPuY0s5XMJopyvNxsWzujqDqMTpWal
RSLYEHopQnwIfWi1+ppnSWwYj6v+MYhetfaIlHkhG07f560ZQDOlY1cOfGDD
tyLz+9/R/wMPpQ2E
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwd2nc8ld8fAHAZZZakEsoeWUkplXxEg4TKzIyEjFJJUdmUkexNWZEKSXau
cW1xLzKuLSXZDXyT/D7P7x9e79dz3ec553zO+XzOeQhZ37h4lZ6Ojq4ZfxC/
lffTX01IKCPd+WEgs//rHPQFBW0LflJGCtB8Y6SCvjPOWevhU0Y6eWHLGy10
XpSAgNm1MlLm5OVPtmiBJeX+PUfKSCo28jzP0PQVd7Uz+0pJw1wfTu2cnIPU
beur0W2lpEsUDToJ9DGnwNyA6lLSjSX/8UNo190xm+xySknXVG7vNkJ/8Sqs
2XuvlDT3a8w+Ad10clYxf2cp6R3frQNi3+bAJsV14hlbKWnAMMLwMHrD0mpk
+HoJaazhS6om+mg268LNyRJSt3lI6nX0KxbJ3IMlJaTqzzoG5eiwdus95YYl
JP6TQQ+Mp+ZA37hvY31MMamccWtI3vc5eGy/m6nwcTFJSddgqgFdcc+a4dn9
YhLda17nEbRwwsz6Pati0qObmhOc03Ow0E/3n4xsMUmIfmfIHXSo6d7paPJ7
kjwfX9CpmTkgW3h02PwsIjHn7Sv5NzsHB6/yxzNeeEdykwwRbF7E5108d6Xj
5DvS/jNDf76iVR8+lEtUekdSmFScYvwxB+dihsn7BN+R2jWUNpxA29Q/XzSZ
LyTlGcnvKkdHi4lpvX1SSDpibFGV/3MOfn6R/Wfe8pbEFaQQlP17DgptwaZE
vYB0JiQgsOq/OWBjGte5H5JLOn1I5yE7/TyoMQsV5XNkkpoV7Bd6Wefh12qo
gOvvDNIhxcZry+gX8yvBSkMZJKpO76cdbPPA0kuxqnmdQUo65RdggKZkeW/p
0sogbdlpDp1oC/VRh6WgdJLT0B66ZvZ5uO/5TOj4xjSSQZ7cp9zN83Bt6tie
mLUkUlZK9fEjXPMglc96cEtzEokuMbjIEP3dtV8zKDqJJK/LtM0V7UB3985D
6STSh+WwwDzCOwvbrl5KJNl7PzkpvA19SvL+offxpNKmsg1M3PPgmMbd1+sU
QxJiWisp3j4PMnafZy8oxZDcPtGmKegZmUKGNoYYUpLIGMM02qlUd191YjTp
mi/j6J4d6I7gwJymKNJB8/VTAYTX6BTdRSNJ40/Vi87tnIeBQpqIYukTkl2T
nk89D/bPVpOqbReekAzzfbMG0C4u/cY/pkJJuxI0Xi+iN8r1PcnnCyX1njC0
2r1rHhReflre6xVM+tH0xu42OvgZpXXP6Ueke9Upvbt45+FoaMNt5m5vkkJw
6Jgu3zwwTZ/aPOnkTbL7TjtmjaZo1ufUM3mTSnKY77qi2zY/rmC64Ukqze17
Go8WYfJ7+kfxPkm+QeHsCLpz8d7hiTpXUvme9/22/PNQLRO1e9jTkqR/wUHW
Yvc8FO90ljn90Iykre2d7Ih+RX/mWN79SySd1sL5e+jYvj/Gnvf0SJrvLNWi
0EVbgy94NB0nlbD7xjegv4q0/3qeeB44N+cwSe6ZhwWlX1+UkvVgh8jR9wfQ
f7R5eykphmAxU6sB6C33bMvo0sygSaCIzxDNb7uuUqBnA/d81lx80SJDrRuY
ZV2gffOXvk9oW+vt/5xnXeDvRFbjCDpn0uJP15ubUJptmjiFlvux+OOZ3G3g
08+d/otW2sQzcVjeDVLD/hwXFpiHc/ttGuwOPIDUvawZduiw4je1H38+gBPD
E9QbaOqx5aoDRQ+hP+fTxF204engkvWDXsDjurHkEbpA1rhbi88H1ic3crxA
V6h51n/m94f693R+Q+hMjfenDgb4wx2TX54T6FCdmXr/WX8Yq7IxmUabmZg0
iFUFgMO3nvwV9L+bhxrtLB/Bf1eaPm0VxP6763ymtPER0N+yb9+Jbn+Y2cgs
/xisGapf7EY/C+JqekkXBNoGxUuSaNW0uabptGDoLnnDrYKWzBbTVGYNgcn8
JTZ19NY3Zs2ht0Igul/58xn0eGlLs6x6KGxs/Lr/ArqlasNZz1ehoLps/tIA
XUhWamnf9gQ+7P+PzgTtR3nRcmPiCaw5kc9bo516hs5WnwuDsb0smrZo/UHu
Vs73YUB3LUnIAS36zbf1bcBTOJHXdfsm+rPXvq/uUeHQztWa4onuo9cST28M
h88PChN80G0BtrYtq+Gwcauamz+6KCTlK69NBASyB1OD0Dmby8TV4yPgBL3p
+VB0ckS3rWNbBNxRYSoIQ/vHsU1WHIyEBRMerij0PV4JiQn7SGhjSuKOIZ43
Rc2OPSUSNoRKrcSiLwtaZB+kRoLdwe7KeLRBhvukGVMUxDllWSeiz4rHSAQc
iYKqpldTSWiVlwV2b5yjwIXh94UUtIJMW/antCgIXAtLSkWL509Orn2KgsUP
jxqeoXkVGCTFWaMh7OZs53P05vd77HVUooHBsb06DU2vdDTH7VY0hAsfCU9H
L5UbfEt9EQ2fFZVPZKC/H78p2UiLhmW7r12Eh6tD7ec3x8Do89MamehO9Zyc
neoxkD3rmEq4saHuG9yNgd3eV3sIV2qOSNq/ioH8PLUFwgVtf+zDR2JA7RfX
DOFM3R0vS7fFwr/5L82E4zv3T42eiQWZq61BhEMNtPeyPIiFjce6pAl799lf
218QC2EPOAqI53E19X95aSIWLhsH7yBsP/xsyocnDkIETSyJ9nDd4lhS0IyD
bT1JCUR7K5nu00+4x4GpKX850R+2Cd82x+TGwdOzU9VEf22VNeQ7PRAHp4w5
84j+rKyuk1hmiwdLvWc+RH/b6u8/mKMcD9OimceS0eX32bVZU+Oh4OaZKwlo
my0elyra46FJlZ4ah96SMXnVaT0e2p84ihHjbdNS69l+OQFsrvj5RhLjYSEf
4hWRAGfYdUPC0aWLKXHytQngc5vhPhFPHLvcCyJFEmFvp9WWYOL666+V6vqJ
YF+4t+gR2lpVv/mXfyKYCe9QDUAX2+0bN/yaCByRCRzeRHytJs9t2pkE20BX
9yGa7SnraumZJBDssb3nQVwv/rKN72USWIj/8XZFs57VE2zrTwIN7ZjLxHwp
GqqWeciaDPZHqBLX0SxMyadGHJMhS9XR2Y6Yn3oX72bIpUCyykyPMdpskuSn
b5kCu3Zf+K2P3nRfNpwpPAUk+vtWzxPX05lf2i2mAGRH1WigmRaraNJFqTD/
Imz/YSI+/GUmBydSYXZ4LFIBbcKT+PPJ9mcw/mZkUBadB3fYF9yeQVOwoLQo
WqZxuwCN/znIHksv3ILeEHEuS0HxOZwKO2jKiu4x8ZMO0X4OouH/ZhiJ+Jlb
OKzs+Rwi3/u0/Yfr3aftbedTR55DSsCJh+NoTxtfX+v0NLg+1/E+H+1dRues
Wp4G84Ix/C/Rfpu9jPZ0poGrf+T1dPTj0vsytA3pwK3r2R2NjmS/03PBKh02
vuLJvYfOKrKTOiGYAVXJfqHK6ByWr9wCShmgMuOQfxCda2Gz/lc3A274v6uS
QecxW3WXemWA06+idH50qZmJp/xIBrhQIn1XMX+0MWp3CqRmQunFssL36PZL
rZVr7zOhcbQh8zWamqeZPfAxE56TnP0z0D3Gpx/ErWWCz7le9gj06GsQ32Ke
BZfvaJ10RP/SV/D4x/cC5NhuWPKj+bJ2Cg8lZIPM6/Kem5g/F4J5nWvfZYNh
F3v+VTTZZXdp9sds6Hxd43oJ7aQsonNrQw6su1U3qaIru+Q8Nl3LAeOtnLGb
0Rb0pzv3K72EmUeswy8wv6dbuvoG9uSC+DHJry2Y/yV5qeP7tuWB0/jLTZNY
bxgxr0Vdks6D/qxa8T504JLkKT/1PNBU/3isGf2l0zu753Ye/F3YrvEKnR4i
7/SwOw++uW+cuY7mX3v6uyUmH97+mb/zC+sbZhcJxgOhBfD8tvih/7A++nvx
6472zYWw4lzmN4f11e4DS+cW9N/DS8GILP2t8zB5b5mNFFIKP/QXTb9jfShD
z+xRGVcKDOYiITS0SwjPt7KMUtC89K66Bf0n5Qi5qKIUAmVk4BWave7+g9zp
UpCNPBTihFbgoJuN0SqDLnVh5wWsPx+mMbc7sZXD418e1WtYv25r2RXOG1IB
XyQPvNnPgvVPklMeX3wF/GDhrRBGX3cmtfFnVYDWrE/3NnQL51UWAVIF+N/f
LLXEjPFpVOAr8rMCGgxeWlWgZyZO35ExrYS37Bu3aKDr12+bqEh/gMZCxiqH
TfNwi9pwD5Q+ABTyGpqjBTN2xame+gBCu3VWddEPTpO61Cw/gOHEEWdFtMIT
Vu0zUR9AStl4gQ6dypsG51c/gJzL4oPEjfNwV7Fd1Lq1CjYlHvjVyzQPF0MU
3QJ6q+BebyzrR7TcWHJjzucq4Nx2S7YWPRHq6DC/WgV+Irnxr9HnJ5gLHsiQ
gPSsg8kXLRmlfizuCQle8Yir7kM73xuU/CpRDSOsSSZRjLgeiIRTl2WrYevg
LGswWqNd3YPlYDU4Z1g2eaNFRV+1yqhWQ1B9vsN1NK3D/fpt42oQn3DUPos+
LbGziC4Irw9YhjGiBXouAN/3aihbSeXyY5iHE1ni1XkL1cDnu9rsgb7iuqqq
tlwN7CySEbfQ2VxZatcYa+BnyYqONXqf7sqpkj01oBWU81gNDU2p5/T0amBu
zuk3E9oq7vbHr5dqoDnDPfcf7mf8bDV0PC7XwB+dazeW0Y2MP3TTnGtgd+sP
ySm07olTevOPamAh763JR7Rl+fSlkMoa2DKTXRqP9gmqpu2pq4EC/h7HSHSG
cYxpYXMNjDOOyYWiJ5dUzPt70JsfT3ihbxyIvCyxWAO9J35y2KO9XivZ1YnV
wja+t0bH0Gn3Ob4ZytTCDekvmw6h686O239XqIW/Vr2N8uhNUyEOW1VrYbP1
tJs4+qnYiLOlSS14enpHcKGfpQa4robVAulc8PvZDZivzzvpuMTUQtiBo65T
aA96PckvSbVgtjx+4gta31ZwsD2nFuSub2EdQrPKVain19bCuY3W2h/RyyNp
u3c210KUnp1fM3oi4vFySEctXOA72VSPJv02eHVnsBYufbvpWYV2/bDApblU
C8ereJML0NY3emc+/K0FhkJjjTdoXaGqBgWGOugrOcOQi5YKCPHg56yDW7qi
WRnokXPi4/N76+Bgs1p8HLrtH3uljXwdXF10LYtGlxf8jOk/VAeaYzJTEeho
7hrNOvU6mNq00zUUfXbQ9G2seR1Ujckd9kUfDlMLYbOpg4Xj31u90KKqe696
O9TBG5PV6w/R6xlLPA5368DmFtPoPXSRY4T38Yg6mLVjcHZBp+++Z1IYVwex
sSW3r6OfdlgclEitA/5voY+d0A4HZL5xvsL7nfcatEcLrDboTpDr4Mn3DzLW
aPY3b/Zeaq0DXsvijMvoPxbRDO3UOng3FStpie6utSopGa4Dw1s/TM3Qta4a
ETJf6uCRhQWrKTpffJ9j2nQdwPHohkvo4OC/e0JW6sD0t4q9Efqu8ueV9X91
kHIoU9sQbTPX3OnKRAato0WqBuiLzwteT7GRYQOb3Ql9NFyMC7TgIsPf9CJd
PbQMo+flLh4ySM1EO15E8xbbHNUQIINa9Xr0BfSvXQpz+2XI8FBAn/M8eoUj
Y+ywAhnah1ycddF/N3B/Oq5EhqfiR3t00HRL/k3qKmS4wP/yLGHG778rNE+S
oepTcYs2mnnYNl/3LBnSzM0MCbN39qYbnCfDf4WRs+fQnA0asaaGZGBvvhhO
eHt5WZCVGRkcH8WoEObNk3poZ02GLS16K1roPelJLs72ZDC3CvxAWDiW3eb2
dTIc4RIPIywe/NDI3ZUMu2KlHQhLec6d9fIgA2fS0wuE5W5ZqgR4k2Go7uxJ
wgq2lP0hgWRYyzZQI3zI5IRYRCgZyrpytAgf1SnkiYskg2KT8mXCKmoi7Cnx
ZPBbZfEmrHYoej09lQy5fcyvCJ+WYvqZk0mGGtL+McJn97h9zcslw2+mh8JE
e3S4JvuLCsiQ/Hv8OuGLG40/lheT4Uy7aQNhwz9N1dWVZGgjj0gS/WUyd6So
oRbby2AXS9hiPDe7rYkMES+nNhP9bd3Dl9TZToY7bZaRhG1bQsP6usnwzK1G
kBgvh6o1n2EaGY7lbCwnfL3w+p2JUTLwG0lYEON7N/G82cIMGSIptAZi/B+E
1egu/SBDop55CBEf3r4K6n9XyDBNTjQh4uexA7cUM1M92LmK7SLiLdQiYPdm
tnoo4LVmJuIx/OISJ/fWekj2UqIn4jX+aN+ywO56uD4Vvp2I52Q5zWkxkXrg
ZabfZ4J+Llw+LL23Hrbumr5IxH8Oa3L9YcV6YBykLzdHl9Iso3S168HS3Ijx
CrqynRJooFcPXM2xLjbo6toTHqaX6kG3iXnyKropV8TK7mo9ZIlY/SDmZ7/H
pJzXw3o40zLlcwM9fN1YOMCvHvzDyCo30ePWzdtDgurhy8lgptvo72df/Y2N
qYd4rsICN2L+8t5oyXtTD4mitx54EvFyYEPsoaJ6CJwULvJGO2pFWVWV10N6
lOgysf4M3i9Z+dhYD/tp31MfoasG18Vnx+pBUljBlVi/fFPD/aR3NEDlDJ10
NrG+FQvrvuNvAG9RTi5iffzZXsR7TKQBIrVeMxDrp81639uz8g1QwHpp4zsi
vi4LjV472wCWxUKPSWg24ULlHM8GqLM4fouGPnn0JLN8QAOkkoX+Euv7g4s9
XSUhDeAUVf90DD3n+8ehMb4BCsd2dH9DUz6rJXwtbIB/ddc7lon1Navrt+hk
A5Rz6wbsxPzCv/d3XppuIzyIV3tqjnb02xpdbtAIPy2bJ63Q5UOy7l2mjSB7
yfCMLfpSpK06k30jpPgb8N1Ax6729tp7N8Kwc+52H/TW9nI6+beN4N5YoPkC
vfG298UqribYTcmw+I2er2Rbon1qAppkXEEG5m/WP0cOfhpogp+j1RdfokUP
29/qGGsCV57RlTy0yVvyXN1sEyzUdJ4vR5OzHk6+ZmqGpuN6clR0Qth8n6di
M9wd5Y5dR6tf7qoQjmmG88XOrRZYf8QxJPk46LfAiUXLa6JY75ga3d7u8rMV
pJ0Ufg9gfUWRH2SrdPuI9z2caIn1nMNKzzathx+hxGC99iqasZrKR/P7CC07
fCYd0Ud0G6VXwj+Cv2CIyD10unOh1sFXH+GXQb5tONo193HI65GPsOsc59Zq
NI+oIluKRjvkTj8o4cP6snB63zYZ3XZ4fqPllBD63DspvgqDdnjAV9wujvZR
E5Tut24Hu5YzFKJe/X6ZTWv7w3YIdnOLOIOuTBkLfvK2Hc5qHGO6hbbaGcbq
ydsBy7e/etaiG2oSHecEOyA2a/RYI1rGKbvNQqIDFk1af7SiV6qrw+BgByhL
meh8Qoc5/OTaoNMBEywlFZPo8g/GfP4+HbB008aBDetnbhsRmeBvHTDk07eo
jfbYLP/kz1wHvF3bPX4BPVKqPOfwuwMcmnNbDdCfNkr3iW2gwJT742Bz9HPT
k4kbN1NgpwSt2Al9iOnuniYJCkzH7WsIQl8xHhTXMqXA9SGGrCp0ervEhJYF
BVoERn1q0KMnb6eds6KA7P0HxmS02X5Wfh07CtwSmvnRjNZnVdp64TYFGkh2
g93o05VRq4YhFKwnf3lNof0VRkqNwihA19q2PI2uzZFyM46gwH3/k9fm0Cox
NQuX4ijgOspy5Cf68PX5L2YZFNho9iHkL1pSUItiXUEBid03/nLg/sI2NvbJ
lSoKMLC5c3CiM9nHz9rUUOC2EisPF1rov3v1VxspwJj7YRdxXs7b+aLcvosC
XAZnO3ajjTV+3L3WQ4FWxxuvBdCxVccVHfopMGO1zU8IzfWqO99xhALMjt38
Ymg2f/qs69MUuGYnSi+DPvtH2/rGHAXa8ve+kkU/dkkQcFmkgG5ttvY+NKO5
fOLNZQp8mWTzUkD/VbR46spABYFnV6OU0HOTZe4efFQwidjkq44+vbBdpHIP
FTjTxYdOop+t3GxbE6JC+WKE/Gn0eRYpAR9JKmyU0q7WQL+VSiQ/UqRC/Wsj
P20064El52YlKrzjoD3XQVsfu7iTTZkKnmkvi3WJ9pxjdQhTw++v2d96Ae3q
7LElRpcKB3l/xBHvD9ru9JT2XKQCeXnqriFazFPBmseQCvZrCueN0D1h34uS
zPD+5hVTxmi5uNMWQ5ZU8FD7m3sJHfgsfZPAFSpM20bYmKAPF5iYpF+jQiJj
ZbUpOry0mGHCiQoztnpXzNDfqrneiLlQ4TxN7R/heGrLeo4bFYROy+22QC/0
i7/87k4FbX+ZNMKa474XZR5Sgc7y0W5L9J8fR7Py/agw+NNonfDF1VidxUAq
+OlSbC6jXzH8XFYIpsLz4NxawozsummuT6hwmesbjxXajPvV2eJwKqhaBtsR
LuLf9Gs5igqsvyPzCLOLXUk5EkeFWmuGOcI2sqTT9xOp8FptSMwa/UGRb6Ey
hQpKR4UNCe9QuZvw7zkV6P90eRK+frpLTTUTx+f4r2eEG3T2zfhkU8Ggzb+M
8B6jkJi6XCrE3H3UStjNclKFKY8Krvz/PhHusFP/dvotFQbSv/cRlnR5FvG4
iApv1nS6CXvfWz3aUkKFSinZJsJ93kYTbBVUICk8KiK8P+jdE+0qKmjttUwg
HByx5fDTGiq0ypS4ER5PcBylkKngZhtxjvDR9MYgriYqnGRd4CUclStyQL+V
CnOGn8aI9s8Ueg3GtFOhN0Y9jfDJioGAXioVuPmOXyKcXHd4365PVNA7RWYh
/Ls1qs+kjwrDDwcKif7X6Z73SR6gwhOlAH3CLwa1pIeHqVD1s26OGL9/E9nd
AuNU0FBK9CFsOMvgafUF4yuBlYPwpn8VlIlpKmw/QOYg4sFBYmjj/BwVvEcC
Q83R7ef/Kf+3iP1xZZSRcGyG6kuOFSrEb7AaJ+LvT5vVyM5VKsS+Dz1D2GLJ
d7vwPyrwuBm/IOJVXLPe5xBjJ6i86D9PxHPwra8lqps6oWc2KpmI97mkTXNn
WTuhcXF5jJgP7+c0TSw5O0FXofESMV9ORrcrPObvBAGDlrWL6JwP8/aRAp1w
hYV3J2H2Sc5nycKdYHxSUoqYf11H9NjeSnZCoWrIcWJ+Wo/0fu4/2AmzT8p2
aRHxwvzfronDnfDEU2vDWbSUAu/5uaOdIBJfOE7M/0V/s0r6E/j9guxRxPrg
LTUWLa3dCXUsJ3JPoCf06FsVz3fCjWjKZVW0xkORDap6ncBZpL0V0FsoV531
L3XChNPuy8ro1DvfTz282gk3Lzu/P8RGnAf/XGp/2An2NuUnpNCC37ll+707
4dj+/HhJtP+2Q1c++3WC/pPGKXG0lu29juUgvL/xTQ8RNI1tLVswthNc7bcY
8qNXDDdeupXXCZkuFf+xo2tvFhxzftsJGkyf/7GiQ0JN9tgXdcKj1+n/mIn5
UZv32by8E74e+m+WkehfWaPrmg2dEP3YOZTIB08ZcvwEhzvBQaC39TtavEAz
r52jC74wDrvUoRdafoY3c3ZBkP5bSjW67EvKbfK2LsgqS5Um8ts5vh9K5bu6
QEerv7MUfSswsS5LDD9/VHPyDfqD2XTfg+NdoHacTiaOyG8sTxiknbvg8Dzz
KVu0UvGZTluXLjDSWmixRvNdoU9Lv90FeSa1Wpbo8cq7KrweXSASAyrG6Jsu
1u4sj7rgQZLOpCY6rPfw/OTzLnDI0dWVQTdnjdMyu7tgca9u5iwLsf9RKtyj
3A38zrm0K2hZzlIOEegGA1WFFEs0//DhaxJq3RB5k2xmiv7jflhQXqMbVncI
dF1EF789FHZCvxvKR3VTTqDlhBQdbJy6ofptyes9aAE6BeHc5G5gSEkf7cH6
iK5KOlJxrRvOjZZOqqLPV6u7PWr/BAEhqkvfsT5zZ8oM+RvRA1o9FWuvsH5j
z1StS77QC4fvb2IJwvruec4++UH9Xtjxc/9Vf7Timz0pfMa9oMF/guyFtij+
65Zo0QuzGYIhbuiCplKpeMdeSBC+pmyD1p+Vj4wKwL+fl9+vik4+JGQVXNYL
ZW8/+/7BelL+GGd7c2UvJI7eObmErof1oyzVvfBurwfLD/ScxhD344ZeaN4+
lTKFVjVNaAro6gV36FjoQ094bZX3me2Fr6ICaqVo2eYN63eF+oA1NvS1O7pt
7v2Kl2gfUPplRN3QTtwOPx5J9AG/tcIz4jzstWXnlzjZPuDJvfvMES2zlN5W
cqQPUj4rNJsTFjmZuHyhD1w/J9QR52NSDwMV7/r2wfmhcJst6Jb0o/u8AvqA
81eANjvaoWlO8tHjPmBkkjrKgs7dZsQfF9YHL/4L3MOA3psrwVCSiJ/XbdlG
nJ9J9jZRlgr7oHPHzsIRtMR+Nie3z30QMVDb/A49/q3jAulrH+T/J/erAJ38
PPow8/c+sLKTFclDc3LuYUhc6IPJDd/CctArc/KJH9b6YMjaNyUF3fzasImR
px+SXr2If4z2t+HL0+brh6jPv9kD0Sr8o1Gxe/qhIHQ+wA9dGHLNUlKsHy6f
nQzwRCc6PFjSUuiHLymsVa7E/kUyXTTqXD9szubjtEaLj9qyDur2Q/Wr5A5L
9Gic9IKoXj8EO/dHEfsd/U3vK4ov9QPH0yCpS2jlr40Xabb9oJVGCz+P5sic
9Rby6Ydjo4MnVNFNpoW2Dv79YDN7U1sF7bvt7rl3j/qhX/ujuTJ6yZeO51RY
P2xo7AtVQg9bbcu3T+qHK1baovvR+QJHhvLf94OHwJySCLq9KfDGVGk/JPz6
EC+EnrvZvUGksh/rE+k1AbQc+YZ4bG0/bFwZ6+JH59m/uPGgox9sd5SU7kC/
fruNXnOqH1g8MZ2h20yson1n+uElWxwLK3qGIV+8cr4fngYOlDCjpQ3Pau1b
6geTxUPCG9G5f7yjtzPQQGWXrNwGdI76nPg4Pw3cxQuEV4j99syxMj5BGrSK
TGwn9o/fYoK0DERo4HnoNccSWuKbqEvTXhpQP/9m/YV+EWpalneIBsEipsoL
6AbFl1rfjtCgvIRPfx79dXhpSOg4DbKvOLjMocX2R9LHqNPAOyWveAad+alJ
6/55GtzILXMnzjfJnjuGi/RoYHeg8z2xn52QsHGZM6RBsdfNpUm0iMd6tJU5
DUT1VQO+Eud7ew4Nn3GgAYfthv7PxPlbo5+LjzMN9ucoHCE87kKlr3ChQQXr
eMo4cb5U5yQhd5cGWzyLXYn9c5pdhgu3Pw0ad3MbjxDnlfuLn+54RIOGkZMT
w8R52WpTHk8wDTgnDVwJ64TPzfCH4/O4cj8n9uPuJhvYBaJoYN5MOkY4U5Rb
WiiWBmPrpwcGifOG0iPXxJJpoBo4IUZYzO/cY4lnNCAHrlAG0Oe1LbP3pmP/
tnz2Ipw95v9FNocGqfrHpoj9f+erOEb5Vzg+clkZhP/dyRVRyKPB7VtjVoT1
WSlWh4posHq4baof7dU97q1UQgM5+XvvCOem/n52tJwG3V6L3oQ/2TOTlD/Q
wLj/0EXCdAf4hlWqaZA2fVqCsPSa7JpqHfantSAdYcNGVX71Bhp4TNQM9hHn
HRF6x04100Bjp9QHwm9MbU3OtNHAJMkojXCfmLu7ZgcN+DdrBhFmXAiJ1+qk
QSDLmivhfeWpJdqfaCAgesuGsIn/2x7dPhpsWHxhRDhAh/z7wgANhtYTdAgX
8PRy6w9j+wY1NQkPjE8dMByjgdrW92cIb3zz96LxBA2OCtP+f33/3S23TCZx
vCJLdAmbnRCOMPtOg+gRrUuEH7MpFljM0uBMYIwt4XefznRcXqCB4b/Iu4SH
n5nMWf+kwfNKtVDCrA7OHFeXaFCpkJFJWPGgt4zdfzRYaS+sJnz5X6TWtb80
uPz3xijhkKYsB8d1GtQK9zMQ/VccWRrkTD8AeS9mpAiPmbXm3GAagIdTOQaE
2SWGG28yD4CBJrs/4cOLC19vsw3AXqHtxYStKxg2um0eAFJTzTThMt29Jz24
B8C7Z/3/4z+xS/nKg50DcGfwSTphzgkdX0/eAWhbLP1K2Paea7Wv4AD8shtx
J+IrQu3RiL/IAJTq9jYRrmRP/BcoPgDt+lf5iPjkSiMph8gMwJEM5VbCxx07
TZ/sGwAhU19JIr7tFb94PFUYgBAOoyDCpGbWsiilAWDf88KAmB9OPwwUk08O
wBnnbJ5RdKGOu+rImQF44ZmQTHg5N1lLWGsANP/miBLzz/fKZ6ucCwOwz3vH
CWJ+xnW7hBVZDMDLl19zJ4jzN/nohGWrAVBV8tIl3ncIPynJPHoV22sgtEL4
9al/5dWOA8DGeM+AWB9qi0Mm2+4NgDNNXPU7mnlb/o8tDwbgUFod4zRa+0bn
2kWvAUgWN/hIuE9iF3d/wAB0kbQciPcts/EvVL9EDkDAi2NdxHrGc78mYe01
9kdulQWxPlr0TmSqFgzA7kZLq//QGQeYC/ze4fOZNNv9QcvN6DSwlA8Andl3
r79odfPBH9sbB0DWnmuIDtfb67CsJTc2ANvVrmoQ63VREq/RzQn8/HXZQGI9
/2/5uHXR5ACQQ8Iaif/X8y/wv3d0bgCK9bYYbCHynxBX1unVAaDeLUrkRtcz
yP6z2D4IxdIdH4n8scNne6wDzyA43a6RIvKL7b81WTe+QRB5nxssjGb+r938
idAg7Es10hNDn5tz+VAhOwiKE5RN0ujOvqIHPKcHoeb09z/E+6vhN8qrVLdB
+N6WvUTkx33SYlFD7oPwzETlzUW0dw6H9NSDQYi44mqrjxbKGDah8xuEjxHv
Ro3QNvHe5XJPByGrWu6XBfq7L9k9JHsQos/HRTsT+dPo3MrJvkGgrU6/IN63
vW74oHxiAO+fk5cWhr6iuM/n+PAgbHFPSQ1HU7i4WA9NDMIOw1+p0UQ++9jL
J7EwCDwJSmXJaHP1K8DCPATBTVkX3qDJch6BHw8PYV7R+NeBjmTK4TaMG4JY
G/ZsXqx/Ko9IKqbbDoPaASG6DnRVwULgVskRkGRirfLD+jDS8LnqTekRMBwU
mw9E2/3V/UORG4GGej1B4n0pp0a+c7jiCAgd6PMNR18Zcdbfoj4CrE2iGilo
5s3TQhwWIzClM0opRus5fqlkjh6B95s5yVNoya0xbvZxI/CUyro4g/5bfFK+
KXEEpPYU7F5Av6DPzHiUNgI/JefuLKFXEqyDN+aPwJjXZyEGrI9Tm0aMGFtG
YEh311V+9K3rT7fafBwBb0bDEAH0GW5oraOMQPw6x1th9IJlqopf7wjQ2U/8
kUSrL5uJ0X8ZAT7OwUeKaJ4U9hGrbyNweCHjpRJ6Rq0yvmZ6BDxfUlqOoWPD
+Nh9fozA43xtNjW0w8HW+tHfIxD7OF7qFBpoHl6q/43Adb3jmhpobm+pI8//
jkCkxRE7LfQ3MdqP9fURGF4N8tdB/w/MIped
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577046466*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVkWc81YsDh10VoaGMkFAkNHQluda30FBGKSUjJaFFIiqkaCIhpKLQQktU
Skg65rHOHkgDSYqK8xvHrf/9v3g+z5vn3TPXP9R9j6yMjEzTf/zf18KvXhgp
fQvjAZd40WEpdKOIhEXv3iJ7bsLs7INS3D7ucSJYgQHxqEuOXbAUJifKjt42
Z0C7UWNOn78Uj0/NCH/vx0CEs+OEOF8pzM+EHtROYsC9wjBleJsUL8+3Bnk+
Z8DMSEFzp7sUSF7on/GBgY9/D0jLnaVgXLrg0zGlDjqHC14Mr5HC6fLnrVMs
6+BZ6nNkwSop2rJWb1q3uw6V2+WfWFtLseXarQ2nU+rAn2nBXLZcClHuX2tq
XtbhBzOgb6GpFDvy/VaO9/7XmzWMKBlL8el2lZWlcj3q5NRcXs+TIrhw9vII
63q0if2LDmtL8f3+MdOSwHrwH5VMMlSXIvyxwHgorR7ijU1GN6dLQZYuNzCq
qsdYouu5WQpSxD6/rBMwUA/HK1UX4mSlkK34oZGn0gDnFRFjLVIa56vcVLrs
GrAmMyNRfYzG1DcPp2rsa4DRCXV7h+800hlKk7dkNiDtWQQ/5DMNjca9sqk1
DbA75Pwm/j2NXGbDOPNrA67KdrVmiGjMa59PyM9qxNApTmgWm8Y9dsIPB/tG
HLESjWQwaSzif/gad7ARmeFHnl5g0CgVof9VdiPe5cdyj1fRWNGd+5542wh2
Watt0HMale+l4mXDjZDbPVK08TGNVb3beaFaTXDdXB1nWUij/nN5+/3VTTCr
9NDSzafh/FWt+fOhJhSor8ubdI0G63s4Qz+nCYdeuXt9S6ex9Ser2q+hCQ5v
R1p5STS6xkxfXv/ZhOrpP1e9OU1jJ3WxTDCnGe+cuuIextLoH//6UMWpGVYl
GuW5kTT2y6wvdItoRmSbrCA9lMbIhMKCpJvNuCqvkXs+mEakvFxuQ3Mz/Es/
v0rYRUOqGHBlgqQZ+ofG1OK9aJycVpuGuUwkyIbeSthMY9JMveRoZyYcfp2r
vexMI1HtxNnyKCbyTuwwuL2ahrJm18lfBUyMKyw/+9SORqa2VbRpGxNemUoD
jBU0tPSyj+ynmCjX++jEW0ojT18Ses+gBaoPXtzvM6ZhsGDLvk9uLZi2sM1r
qj6NYpPSAN3oFgQuNi600KZhukTZz/tuC6pNT4/5qdF4+nfI9iusFqib9dhf
mEbDannLZs54C0LMrVJL5WlUW5q4TjdqRYNFZnenDA1Hm/PrNmxuRf3oWKcW
TaEJ/fbnTrRCRTVh0PcXBVcHR9u3Ra3YuUyZyhuiwF1TsOIPtxUP3XPle/so
bF8vY2Yt0wY6zER9QQ+Fdy47FkUtbMPatHKDfUIKAZsqDcu2tiG2cuOa1ywK
A1u05g6faoPtjS+B2kwKIZ5HZy982IbxuPhzxxgUfnnz1YKEbajcNbuQX0Xh
qJ+58q0J7YhxeNq4rJzCb/90xZ4l7bCe7/IltYRCfODIxNle7fgiORxFF1GY
vM/1z9Yz7bi7uz0p7BaFiwcfUOkl7djdsTBvIIfCzDDF0bbOdujZnn/ql0XB
2co86syEDnQX9TbyL1GYZrM7Ql+zAznqq7pdLlBg2aaHvVnSgbp6mbameAoZ
eBPi59gBTWaPj1cMha2rRvb/u70DIe3VXwePUNB00N17PbQDtZzc49GhFLoc
XQP/OdMBVWGMwpS9FG6sid0tuNaBvV3e2Tn+FHate7DzSEkHqt9bLVjsQ0F/
faevSn0HTFbMkmd7UOjfoOj9pLMD5dGEa7QbhUKXfzzdfnRgdY0gy8CJwn63
YI9vcixwJr5412pPYcmmK+5J2izscso2jLKhMOJe72ZsxsL3i0dD9CwolG0Z
c25Yy0LYyKEAtimFyK0G6/f4sjAhZuzAZWMKlp6b104IZyFT/viRLfoUpNvj
HfPPs2B0+Xes2hwK1d5PVuEGCxU6CWf56hRO+r636y5jwaVY/tIVZQoOftNt
optY6FmefMVTkYLcLrt/NHtYsNDJe204kUKj/0GL8lEWCr92dxH/kkgMyFnm
ocjGYV+/f5sIEi6BzKW/dNl4NBiz4PYPEsrB9OK05WwMRl3bdOIrCfZe44Wm
G9hQ3CVJ8+4jkbXf06h1JxuvAhbm2/aQ8Dx4bv7+SDaGLHo69UQktEKfz1NI
ZkOSnmygwCHRfahP914+G14OWd2SFhJ5h1XnrC5nQ2/k0GhfPQn/CAetTy1s
rGfYvOysITE/8vCsUx/ZqGXvauVUkBiIylfVJdkwW82ey35KovhYx4yqqRzE
nOLo8h6ROBj9Z5q3PgcW3lODhIUklsYumUJZctCrMq9soIDEzxO+CldcOUht
sfhD5pB4djJZbnkAB7ZnNmxQuEIiKv7VBM4xDvb6Oi0yTiNhdXpQJuwSBwMR
42ynJBLjZzR/T7vDQWDy42P7zpB4fW6d9EEFB323/PWS4kjEX4gi13dwEHRS
cXHlMRKOSXfHBvo4cDevCv8WTkL+Iu/nWSkHNgOhFTohJJpTJo4YzOAiQ840
1iOYRHLqsm+1hlzcKe71yvQn4ZbuP7jThotnrtcseT4kZmakff69iYv6n27q
attIcDNrenOCuDCK9rbesem/H1eGP1jFcjHl72yieAOJ7Vd1eoTpXAz3c8uI
1SS0r7t0RRZykQr3/LUrSbzLiRGpVnNhGL7y3k0rEvk37vNLOVxU3l3ykDAn
EZAn5mz8wsVmsXaZmykJwwIF1vffXGwa1e59bEziyy3LtmRVHrjzNx6YaUDi
wZ0gpokJD57bEkYjdEiE3MtqbAQPdbR/j0CDxN9FdXWBHjw06uiRjiokfhWP
1k7czwPTvlu5dCqJ5w/0awpO8tAWeM1YdzKJo4/cq1Zm8cBK3GafLEvCuuRU
xbv7PARbKE36M07g95OS8pg3PMhKiJRIgkBNWc9TLQEPec96Nb7/IJDwbFrp
iyEebI6wCvYMEVhTbvt4qywfAvPqRd39BCa/PPBgdBYf6z4qLPH5QIBZcb0o
fTEfBWXjOV2dBFIqm+8udeBDenpYyZdPYGM1davNk48tWz8e7+4goFJjlH8g
hI/8oLVxAUwCvDfbbiie5uO4/eDloToC2W/PXi+8yof7nIuFETUEvOqeZa95
zMdC0rRqvILAnIbezF4GH1nDcYzEZwTeN6pcjhfzMbznjJ1WCYGCZvtUvRE+
nLoSXxQVE9jTEnaxepIABe6pZv/cIWDUlpfoM1uAlEzL6NabBAbb28/RSwWQ
sO+82X2NwEPW79PZawTYoawymc4gcIizON7CR4DXXV7M1EsEzHg+cdwwAY5G
LVi7OJHAGD8p5vA5AZbOHK1tOk2gXFhxTDlXgMEHNXaBcQSOi79EPioVIDdy
B0fuOAGbLo0I50YBxN5FL4sjCPzpXhs22C2A+qrRm66hBGp7IkPO/xLA3RBn
f+4lcPrDnf2GCkKkKCUeyAogsPYTN5ihI4SwutgTfgQU+yYE+psL8VCu8/m3
7QRa+s12y6wXIsFVSS1nC4FLA7t23vATwivLOny9GwH3wVRfmyNCLH23n0U6
EVAdeu0lThRikmGO6T1HAoJv37cdzROi82DLRQ8QuDo8x0P9uRAZXqNpk60I
+Pxwdn/KFILuXKn81pyAzq9oN/cPQvj5XkyJNSXwYbTYeUQiBOOdaIqlCYHb
EpFTyhQRTHYaJv00IBBITl67aJ4Ilz4cVnioS8CYXuHYvEKEMf/X54K0CAxJ
A1cFu4iQfCsoylCNwKN/M+3kdovg0m2oODSdQNgfhvXtoyIoz+rPeaJIYNlf
o5b2KSKwN94xjZpEQCKrb/H+lggZiQG1NjIEXk50X3bipQhbGfoeslIJouVO
LdVuF6Hi06+u1jEJ7CaXLK7oFcHaYWlY7ogEMoo9Jp60CJUFByYd/CrBW6Vp
RpLpYtjKFl216Zfg7FTb+RnzxXi9q2/xlA8SrJt+YJ6ZtRgr38yt7eyUQGnG
dd2OjWLohZ1UesaXoG1ms3ZIoBjavnaiFJYEqaqU5pQYMTSdxu8Gt0iwWd1o
VnGaGGrLKyLsGyRQ09imuu6eGDPnHrXXrpVAqHl2Rn+lGNOmWihLKiX4H1+S
epo=
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwV13c8Vu8bB3AjJdJQSjS+kshORMvHHqUoiqxSQkJCiqxCyogILZto2avH
OMcWDSQN42lSVpLHeA75nd9f5/V+nT/uc+7ruj73OWInzx0+zcXBwbGXk4Pj
/1fJqsUL7gs+IK6Ucco8EFpInvm1e0P83H2Cx7mgSZhzISmdx6e87MV9IrXh
0mTzGx5y0Ouj4Y3b94kHXQsDSpN5SGeOixf8Ze4TzS6PfA320l5T+PL0sXtE
rWvxeQ3/BaSzrtTlHSV3iKdbd9zW5uUmz6at+vDeJZ7IdFGRIQ04SFnHbyOH
1OIJDojKJW7gIIdlC7lfcscTqqpv7PV+zRMu5cYK5L3bxLJBsZRCLdpvwq/l
NMcR0qkJu93Yc4TLHIeKz+ZYQqyex5XXnyK6Cz+Jq5RHEak2jwoTWieJhyss
q1ceiiJ488KJ0ZBJwt39o8X4r0jiW5X24hT1SWKh/IeoPNFIYvDDUMXCIhah
9Ojd1NbAcML+pmXcQMoEEZ7S1rpBL4zoMvTdeOfGOLErstGTtzOI+Doy1rZF
eYTgGdJdOuASRLw+x0g7WzFMtBk25DTwBBEnRpUEDbWHiZdLr1fwnAsgToQN
Lmk1GyLEeYKj2SqXidUadgofAn4RHX8uqX6v8yIOm/J2BI7+IEjZuPV9AccJ
rxkm67NbH1G6xlVWz9+acFfWv/4qt5d4wqW/O/fyMWJ5Umpmyu8eIuED2yLg
kinxQeZzzJhnN1G8IvyQb/NeItLvMK902AeiX/z1ROo9E4QUjGtKvO8gxHtb
OXnl3BHzwsvAX44kHE4K/XMdcccJl093tzRWETkDtuy3z87DxJI96aFcQciP
/xlPkffE2Bdy1FaklFBbJPxdVdEbHLMjjQarcwijbfaNjtv9wOEqoCHNl4wK
rYCGb+tCoGh/RPeVWiMyDUp0lUNDEKSS/VbTpQmRB4cbQkZCQLo/aVmX3Axr
S8tGiepQ5ChGpgnMteDf+R1NjsfDoBYoqLE85w000kabh9LCQRoNGG+w7MS3
QIV+n7gYNDf8jf79oQcfuPZvSW+KQab7vaIPlr14Gerg0ELFwOJjVdOKnl4U
RyT1i9jfwsu/c0IXe/oQksg/UKEcC6/TLoWxzp+xJW9gYO5dHEoK2vVOmX6F
U1/KryvCifAsEU4z+vkDgh4Ck0qGiWhlZnifFu1HJc9lru8+ibhov99pz8F+
rJA7KqrXnQjC/spLiaJ+MC4vOcCXfAdBX0arR30GILDWJz9W/B4O1l/yvUv9
RKHp4YsZ8kkofEAwtduHYD1ABJsdT8KClrqFT2eHsOiyXAxPTBLuRmSKdEsO
wzqd95HjnyRsCchYFu0/DJ4/1Z9kipOht6rswJEtI5BtEtr4aV0q/IN15eNc
RxFgf/XqyfQ0xHR4J2g7jyHoOYerBiMNsWvl9ur7jSF4aaD5ho40pMs83rr9
5hiul1+W/cSZDuFhHo36gjHELrnQdcguHeWpliavp8aQVeworflfBpRM9Ffe
DfyDlwsOdGxMzkRtoObqyoBxvD7WWjlXkgmXIaFKdtQ42nMNs7tfZUJHzO7t
5qRxdFno+SXOZeJRz5fi3RXj+PwUW5bZZMG/Iv+t9+Q4JsyUfP+JPsSj15/z
dpz5C9GsNZt672bDWlbAzkdjAmPhIq61RdnYg8hhp4MTqHdfX579KhudKR7h
2tYTcNkjftCDMwf2P4ccGBcnUPlW3nfRmRwYewkFFDybgC2XXsc2tUc4xj+e
1C3EQvpxr6vXuh7jzdOvVq/es+Cte/HV2bHHCJoeXmXyjYV9Mr7Ch/ieIMS3
+i85ysLfycBcUfUnSJWr8XflmYTOzYhP+VlP0JtUuGti2yR+VKYrdXs9xU51
xarWsElIibR/VViZi7V9Hc1qklMw552LOyaTC0HVm6KLFadwbVJKN1g7F/47
ora9VJvCj46g7C7PXFx9tnlAet8U0iMUXfw7c6GwOmS7kcsU1s1Fs1ri85A5
qDMqkzsFXnfJBdsj8+HgfNzqhdQ0/nOs6tG/kw+tI7sYyxSnoWprWmKdmY/Z
XlfGPtVpOBgFOlyrzMeOsye6knWn0SD1vvnjcD7W302aI+2mcfXLtaigAwWg
o+HzdOI0Zg/3r369tBDpD85kx85Owy+2OqVftBBG3ziDF3LPYK49QWpeqhAp
WzSG3RbP4J+J/i5F7ULcCRHMWr96BhzGOTaxFwvx9UDxsQn5GSzY75x59HMh
OvtKmXG2MwgJ15I7N1IIw2zJNHP7GfC0iJSGsQvxkNu/d7nzDBYatjaVryqC
MFfh/KkLM+DVlx0SMSxCHFeQ182IGSzRHt3GLCjCtKrpTo7SGURebWRMVRfh
yOghhU0VMxCoTdZe/rIIjucGL+8iZ7BU0/iIZn8RHmXdPHCwZQbLkX8pQ6QY
++9nYEHfDFbt9iAcg4ux6l1ZbDE3G+u3TxqNmZXgzcVJe38DNpTVxsNa7Uqw
S3Rh0zkjNoz2jtY+dCsBJ3n9sKUJG776/Wo210ugtjNmubAFG11WXZtbKkqQ
8cLdRNWRjZiQ0tmMTaXYtLDyr0AIG9k3ClUDFUpBaqp0hIWxUX0z18NyTylG
JmYD2OFsDN95+HP50VIIqrOdW26xYfgsodP/RilMs+8kC6WwwdXl/dR8rBSd
1OMeu3I21nZ7DCjNlcJ/WZyUawUbip/dNi3lK0PiM/fu89Vs2A463KkXL8M3
0dR7jvVsVPw7GrLNvAwVt0768bSx4SWpas1fXYaoTQ/jBfvZGLg0xU9ElCMr
aId0rgAFWS5e38rEcoyf8Z19s4yCe4Twz+cZ5WCsbJsbXkGBnbSzvriiHBus
1mYLr6awpO6y3+OhcmRHnNJR3UBBSYBjJH7/cziKT6xMlKNwMWG5VZz5c2i7
Xa51U6BQuVHsRcyp50jTc+XS2kZBV0krK+Lyczidlz/YrUzBwjzE5sqT5+iy
YZV/3E3BP433tQs/A3LCjG98hhRqpdfucV7DgMJxg+PJ+ygsLN762FGcgUUJ
WU1yRhRiGvddO7mbAZc3VV4axhTShyLVLc4ysDcp7oPKEQrNKivytFsZuC3i
4nn6BAUBQmy95nsG8nr+ajDsKBw2UIpQ/8aAn46CCf8pCt2Wpo47KQbizcUM
0k9TGA2M36ggU4GYdm2ZTGcKK1vWxohEVOD04C2hWU8K5H2XXNE7FVDjLBFX
uEDBzZV4uS6rAny3GZK23hRalp9evJGogPSX8K35lygEmedfFf9bgeS/1hWb
/SnIb+VO28xRCfuBgY1qAfT67COEhEAlet42PdIPpLAjmaIkJSth2ZmrY3WF
wvB3vQuyVpU4Mx6teiSUwr3Su3FyTpVo3+fmuO8aBf3rwwXyFyphfUVxcHcY
vR8ysaOK0ZUQ0nvwb+UNer89eh1V6irx0n/j3J1ICg3znpbqMlXY+XByMRVL
waO98RLUqiCUZDxRFkfhv4y1iRq6VYgN1Q07f5uCnx7xVut4FWZvhlR8iqfr
H8V3QD+uCh7nMRR6h8JnW5uzBqlVkLJPyZG6SyFKMf+G4bMq1FADO5pp/3x7
pHF/UxXGlvR8nLtHIVkkDSZUFb5ahdZoJ1EwGv5rc4i3Gl49UTdf0Z6p0vM7
LFSNVCVpU7NkCmZ2w+VmCtXof0y9s0ihwJejqnTsVDVObi7SUU+jUO4TbmLp
Xo2KKtVD+bRP7+91s/KvxiElZ9+N6XS9Rq8+sUmsxt+OP8os2hdVXm8+2VqN
FetHmgIy6X6IUPEOfV8N1vn3Kp205b88aMr5Rq9n6KIumUXhe+RZ599UNRg3
SuQaaRNfOyoEeQn0z7mJCj6k66G2S2DHKgKRa3oLrGibfOfN95Ml8C2goH+A
tswud85UNQImUuwI6Wy6n2PeH67TIXBarXLAmXbl7oesxTYEhHW12r7TlorT
3p0YRaAs9UpdVQ4F7l+PIxl3CdRxMX1HafepC/b1ZhEQm/fkXv+Iwu3Bz0Gb
qwlYz5nFe9I+p2HQod9CoPnrhqz7tPcl5Imf7SLAVFoXV0ObUyugsWCUQKhB
0OpFjyn0JP5Y845NYGGKTuGW/9v7obIfN4nNEVNqOrRbxCx7oxaTGGFWPTtO
u+ylwLWUZSQa/cpX+tDOvFgjXyBEov/QArcY2rGbLryvFSXxwp5BZNEOeiUV
1ClGIqvzN/9z2q6XeqT6Jen7fSVHWmhbise0T8mRWPVtbepH2gavtX0XK5M4
4CQxStccO3ymNonuIhHwX5/WOO3Nm5+0ymqQODaim0bRFnxj66WuR8Lvu+US
7icU5n0E15sYkXhjuiaMl/bw5sYGu8Mk6hvOr1pC+9MbHzdPCxIPeWzKBGg3
+8qtCbUl0SHe7PF/l0h8IRLsScz6JBvy005vu+2U40zCPq9JfRHtmMsGKxju
JHirJI9w0g7YMvu81ZtEz5/k6Bn6ec62553s9SMxPLn4z2/aFn6n+H9fJRH2
VtPvO209yTXFHDdI2P0RVX5PW7mjxVowmkTBf86izbTF/AN4NsfT7/+ArVxG
e6mUUq7KfRIVAneCM2nPdvw4qp9GQufWYr7/7/eg/915i2wSXAzB1v/X473U
gRznZyS+x3u+sKNdGFA8E/WcxJb1MjdkaadudUpPIUg8dRszXkY7qlN0f0ED
iTtNg7ZjdH84SQc/6Gwncf2ryolntI++26Hb/55EOvnR/AZtnaDBkaleEuv7
LdJP0d7YdQiigyQcxs/sWklbM2sLmTtGYru55K/vdL+e8qI0tKZIWEpcf1pM
O1swS+vMghrcu7Ev4CBtBeNp3bINNVjt7pFzlu7/QxteNe6TqIHPQX5zedqe
I2n6fTI1cPCb3/6bnqeyiP2GPDtrsE3pSuhZ2mhONjI1rUFI+6Peg/R82iV6
vuo/VgPVUeoIN+1gB4ODvidqkOyjL1RKz3fTgnHjNNcaFKU0e62mbaypa/o7
rAaOxZf46uh8OM4YOhZRWYPSf4qir+m8uXKD/LShrgYfe7ROOtHOsIi3KnxR
A783jhs4aQ9Mqtt87KpBx6IfHPJ0Xp3bHntC8k8NknQeMy48oBD4VM2xTqIW
rrqNZgSdl2mXBX4ela1FedIZeS3adfu+Og0q1YLFbZxdl0hh0a8I5xUatQjl
HAyqTaAQLcF0PW5ZC/9DfcL5dB6nJId6UTdr8eqUyKxRDIVIE5eD7vG1IFp0
71dFU/DlMpX6cb8WYybR/HK0zRz+63mdU4trDjJOvDfp/JSv0E6vrYXklvQD
BREUvKrGBA0na/E5yTX1FX2e7OuxKkiwqQN57chVdT8KE2uVRrfJ1sNBfyvf
GXsK0wIZX1SV6qFUUzvymD4/ZzlXvdurVg/xfxEKwycpLBhkVRjq1CPOJq7D
hT5vhRjPb9hZ1+Nsg025gy09z5aaErci66HJl7FE3YLO43sm1mPD9Ug/Fdt2
dT/9/SFyriX3WQMMGPNBKYoU1m1l5aYZN6H05mki8w8bvyv5Jz+9a0aaSrRz
dBEbidz3rzibtcCsSNoh7gIbVuaeQu5/W+HbsIa8qMRGm2IPf6X3KyQu8F1T
OzEDuzU3+QJE3mDbAbWTlkUzOGXRs2W/VRuMIx4OdXnNYHTguY+vaDtCGyxd
BffMYNG/irbvQ+1oKzItW8cxg+mjC4955Hbg5MrkstAX0zBbHMUt4/oW0932
TjLx01DXUivcsKcTCv9exwbbTIOjWiZWZa4TdTEWHuHS0zAhtb3DXr/DD0Gx
5coTU/DhyYyYvdUFi6/pZuq1U1iSqVH34NB7XHpnID92awpyLzjnL4p9wCi3
WY627RQkt/G7eH/7gNzW20El8lPI27izN6/kI6L79liOUJNIc8xwXxXyCb8z
fil8bpmEy/gRlQc63fA23Kj2I2kSDdxy/2yFetDM4P21xG0Sk+ZG0zr0f3ff
soeq5lqTiOXJWXU0sRdnMsV6fYUnUblTSiXdoQ9+zXstDYZZqM4fu7ZCigmJ
kFtP9tezEHs0VeO8DBNZ2Ql8D+pYcJw1ZrfJM5E4OB88XMvCcoM81xgVJvy6
JRqjalg4xXQ1W6bNxL3fbdfbq1ngXTokJmDLxHy60nLb5yyYnv1RyXubiesv
ibMRuSxIrYj3dkpkwlxEU5r5jIXZUh3F5ntMyOw/sWA77YdcmRlhaUxQpSn8
3U9YmL57MnxhHhOFPjscZR+xkNzMNF/QwsQTtVNWnRkseLhFr7B/xYThYrsP
W2nrr0JrXRv9vF73zgemszB2PFk9+D0TXQkD09JpLGhPWUtw/WAixW/eKjiZ
BeGkJUy7n0xsjBut+JjEwrBW5Z2aISYuaDupKdJOuCm65Mo4E/GTm8J677Pg
rNza8JnFhG/lxWPKtPHJN1Bjhgm79ACDiHssrAqS3pk6y4RLuKbZ17ss/JT4
ND4/z8T40Ra/nbT/B90KIG0=
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577117084*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVl3k0ldsbx48xmVIkQ6g0iKJMKfRNhAwpSSSRJDdFUnRTNJFQyi2KEopc
uSVJN0Vldkxncg6Hwk0qed/3hCSU3/v7Y6+9vms/a+9nr7Wfz/PdCwPC3PeL
MxiMRnr8f86IuHVJVFKNl+beIgZDBJ2oH+dXvK/GLI3kpv/ERLh/ckdM8Mwa
rNwZ+DtAQgT9mKcn7pvWwOW61eoPkiI8Pjs7otevBj62tz1WS4tgGhd2eH5S
DeqPxph10fpFQssBr7IamOT6q8bNEAHJBgHX+2pQWnnLpoXWNSmXdrPka/G4
9L1UGq03//XJU96iFoWFusw9tG5N27TNcV8t5Bf8rZtO7+eRcc/5wpVaeAl9
lHylROi8I2b/5kUt7l9X/LWIzmdPjt+Gqf5a5Hw4/PCsuAgf7less1Cqw5CL
Q/oC+n7BBZpmxyzrEHrIRjp2kgL58E+j4qA6SGL03asxChGPBcuHrtVBQ47L
6aMojJeYLdarqEOOvdzT6c8UTpf9pR34uQ56P5geJ/soiJd/U8tWrseGwQ35
XzsoJFS4KXevr4f+sZAUExYFhbf/KKgdrMdBDXsluzoKqTVyMh436mE0zrdy
eEVBreEP8atv6nF69KCK2RMKd5rqp5q+1oP/dn+nbD6FRW1LfsyY14CBZ+fU
FDIoPOCc/2a7sQEPY++P912msILf9zX2cAOkNZwzlp+lUNKJgZc3G6ChJeo3
PkZhzbs7vT+qG+BSpxb2NYjCq95JoQnVgMT5eVw/bwo2/d7tYRqNOKmpLFPs
TKHu0/O2h5sakVCj71JtTcHl61zmpyP0ekV3P9OIApuMqNG93QhfdtCjRwsp
eA6zK/3qG6HwPqHgqjKF7u9GLzKHGyH+6JNuiBQF/5+Xnwq0mKiSEsY5/CAx
MPX1H+XNTBjuVU0y+kIihOFU4HaMidToq3lGXSREEgW5SXeZ8G0bljdpIRE5
Q/pOPZMJ4cChI56vSUzKBqZLjDGxuG23X8oTEmcUq65hYRMCIqcS398jITVn
QXK0SxNS1k5zC9JIJM6NiX8e1YRKIWPb8UsklNS7z4zkNoGMFm+1OUXixvx1
0UatTdDWknRWDCOhseDm8ZCfTdhSKdUg3EsiW3cs7MHiZsT4zdj0wIPE4mUe
Bz+4NaMgem11oCOJQv2SQJ3oZuSp6f42tiJhZKjk55PfjOxn8mvFVpEoXR3q
nc5uRpb7WESbLol1Zs3buVPNyKB6Ht2ZR6LSQn/LLL0W3Exu/BIiR8LOKsHR
eXsLvPVV5RwYJBoxsPFiTAvG735P9PhOYIutnXX133T83HbZgEECPPvcNdO8
FlgklSaG9RDwdmIYWzJaIWBclz3NI/Dedc+KKINWREZGJCY2Egjc9mrpU89W
pAsOaKS9JvDZQ2MhdbYVZgemZ80pIxDqdULT4J9WsMbSpK4UERjx4c890NGK
w/GGkzPvETjhZ6p0T6INsqp1orhbBH4HpMr2GLYhP893QOwqgXNBIknNXW0o
bfIXWl8kIHNwy7RnXBu6ovNfOcUSuHy46GdqcRskVwxl7YwiMCdcdrS1qw0G
3avPBoYRcFlnGhUnwcL25Kh94QcIKFrtO6arzkK0VcWmGD8CbOvU8LeGLDyP
vDCneyeB63gb6mfHwpGplyrXthHwtBGF/PJmQf/ciKq9MwF1W50/MsNY+G+G
gfqkHYFuuy1Ba+NYyLgcoFm8nkCW/el9ggwWPJQztPZbENjrWOR/vJgFxVts
HQ1jArpOXb7KdSzYT9fHm68kMOAs6/OkiwX+Y4PebD0CBa5rvdy+sRDkn7JW
bjGBELfgHYQ0G+NKI6nHdQgYbkt3T5rPRsJbz6EeDQIi9zq35cZsqB0t3+Sk
SuCpx3eXegc2avsSJD3nEIj0XOy035eNI7YcyZOzCFh4bXeQiGBjfp6mVJY8
gUnvc3Y5CWw0SO+XqppJoNLniQ2y2Dga/EhqQJrAGd/e9e+esqHN/CElK0nA
1m+WVXQjG0wDG2lDMQLSe9evVe9ho1+M77JleggNAYfNn4+ysaKuNPTBryEk
Bt422SHLwfPU3HCVqSG4BjWtGtHhYPkKlbU6k0NQCp5Yec2Mgzu1cQz9iSFw
/lhuYOTMweVVbHb4zyGkhXjptfhzMPzV6pkarb0OX1wSEslBbaW7JH98CBph
ZYtmJnPgNaXePEzrd0c+6jzI4eCssb38cTo++6iK1qbnHDiJ9w0p0fsHHLPV
+NDMgWKLlOkK+vwlkUfnnf2Pg9mm1okRdH6fo3JUdMY5OJTks8z09xAK/2TN
rlDg4ttUgoUbg8Dh6GlFH10uzF5SI2HiBFadNpT/acEFw1wnMVWKwHCM78z0
LVw0F29Z8EyGwLMzydJmgVzcNIgpE8gRiDr3UoL7J623znY1UyKw7sIgIzyF
C6bOpTO5KgSm4tR/K+ZxMUUySmepE3h90XGyqJwLo8oTn05p0fVwKWrcicWF
/dKmjRa6BOyS8r9//shFcGaP1Tj9fmZcbh+On+QiUWnU/F9DAswrkqLFs3mo
L8r/OGBKIPmqCVG1lAfjxQ/3tFgScEsNGPS34uF25mPB0410/Vy/9un3Nh5k
lEu3ZmymeXDjTf/tAzzIV8ezzOl6SEun+tad5iHctOuNujfNh1vaPR2pPPDz
jJ5M+ROYn+naHVnAg3S49irNP2he3D7VqVLJgyDWp4wVTiAn6yG/hMtD4ZWb
VvEnaX5kC7lbv/Bw6k57leV5AktzZ7LJ3zyYyk6YxyQT+HLPojVZpR3Gx10V
vtwgUJR3oElfvx2rerM/bL9L8+VBWkMD2rF55ssbNQUEVv9dWxu0ox2zKI/p
thKaN4WjVZIh7eDzyOCuVwTKinTf5J5pR1Z5AmegjubPI/eKDWntdB6LrIZZ
BCyLz5a/f9iO159xzLaL5tGT4uen3rbjQo731baPBN487SnVELTDYVdEkY+I
wPlniiX/DrVDTvlyw6cJAvbPrR97ivPR1pTfHyFFQubFoaLReXyo+7+Q3KhE
oqk88+/UlXyQlrza+Zokrrxi5q+y5aNmHhX/YwmJrZU/77V68XFrZKYjh+a9
8hu9nEOhfCSt5HNbLUm0v92ZJXuBD7FkiseyJ3GzOj6z4BYfkYMyfM42Ertq
n920f8wH4bhIwNtNQqu+/0Z/DR/nqsSTeg6Q6G1Q/uuckI9uQ0nfoaMkcpkb
ry4Q8WGeKWX08zSJ/c3hlyulBEiZMUNMmu5veq3Zibs1BdCDc4bMdRKDbW0X
J1YJ0Gt+94f0XRL/sH9fuGkvQIbhiIdUIYkj3JXnzHcLcOmxkoLYMxLG7btj
eeECLHNKqXhH99vv/KRTRy8KUNOvEFrOJPG8o/xPpTsC7ItN1k5vJ3FS+CXy
UYkARRPjmm69JKy61Y65NAgQn2C058sgiel3DuGD7wTwVw3KPv+dRFVPZGjC
iABW92//p8WgcKEvL2TpzA7MM+Yu/leWgsMHXnCNdgfWeJeFKc6lIPtRIijA
tAMlASxZTR0KzQPG+xhOHTA6NJi3bDmFlM97/bP8OlB0XNLG1ISC++BVX6vj
HdCL1e7eQPsXlaHXu4SJHbifYBHl6kBBQJA7T2R3YFGq+5xd2yjcorR2qJZ1
IKSwiqPgQ2H3Nxf30qYOOKo9yDMOpKA9Eu3m3teBZfFJJ3YeptA3WugiGuuA
9GiY86lICvfHOjdfke9E/14P7ZxYCkHjMg4rFnWips3iW20CheUTa+yYazqR
a61VM3iNwtBkkE2wayeMV1vszKH93KNfN9ZL7+tEziHFNU9zKYRP11jeP9EJ
pYJ+1dpCCiZioxYbr3Qi5kP5GL+Ewpi4rnnvvU6Q2tf4n8spvJB0N4l50Qnf
XQfKJqooREufXTW/rRPm0hK6u5gU1ssUryzv70S2dcHmDWwKDNkefa+JTsgc
dz2ylPar1XKKemOzhDhaNJwm30MhXsF6yfUlQnR/SK8Y/kjBcdahRcaWQthp
Wvd3DFGQm52pw9oqpOusPDt0mELrHOb80CAhEg/2hg//oHBV5ae6/CkhVHSl
bSN/Udiuqjev8JoQLGKu7Gn6PzFXbaeK4wMh5jILhtfTfr1DPX72wCshfPIt
uxi03/8fM+hSmg==
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwV2Hc8VW0cAHAjZSVRKmRHIRqIUj9lU2QkqcheiRCyslL2KCNJ2VpGKdvh
msm8CPdelCRx7z03ya7e5/2Hz/fjnOc55zzPbzzE7TxNHVmYmJhK0Y//f6sf
ZnF89KgGG/N9abxRhMNoTAx/bEINdt9GQPpcIQ63pngJgeE1GHHnltnsfBxK
H4iKXnGtwW4R+5XVnuEguqQ+JqJWg9nJPpN3fIQDS53/uYLRaqxKw0ImPg6H
Ti2actmuaizL6k+UpCcO5pajm9vS3mOfui9ZTB/FQclROHOTyVssYvOmk7Gv
6PDGCRyqNMsxV5XVc5oH6cDFNmUUFPcCe6XwI5+nmga7mf3Fom6+wPJF1IUU
3tNA6g/XQvzFF9hsf3+5USUNTv1WTsuRfIFt314KD8pp4P0thtxc9xxj/+oq
K/ucBqNth13YqSVYQZa7WEoWDYqiw8PTzhZjwV29OaahNHgbIWCWc6QYowTp
7cgKpkFT6Eup4t3FWPuQB3UqkAYkv+GO6uki7Ct6gwB/Gmx1PsBDCS7CjkYF
Rr/zooGv7kCWxOtCbDGY8MjXngZn2MUry7YWYBlwhCBgQIPF9XhR39/52Gcx
icASPTQ/vhKrOp6PfbdWzj6hSwOOkX7b5lf52J+RVCknLRr0F4ZtGzTMxwb2
uN/oPkUDa83Pbksxedj+ExaSk0dpEBT6VPzk5lzsro1onrQoDeS9uRKY6c+w
KEVu49m9NJhw9F9pG36Gve+yT3kpjJ7nnHGfUeEzrLLKgKwiSANO4X/B17Se
YfWXLYuu7aTBIZ+G8i1sT7E9759Ls3DTwPXHCZG0P4+xxHlzctQaFWTLOJW2
fXiMqTz8fdFxlQpzvmP6MQ8fY2UpfmTdFSq4MfnfCpF7jH1TOb3Bt4S86023
46Us7JhDcGfzT2Tt/UEq7zKx6KV/ORE/0Hhcy8nlYZnYj2ySSNQsGq+/rUj2
bCZm4cZSc+87uv6KPVHkawZW7lClkfYN2SfnwJbtGRi2JaX+wxcquOfuGB25
noY5us+bPSJRQd75K81ENQ3zeFm/Wj9GBar8G9Zu1jRswzmja2qUCterjRWb
sh5iTJ6qP5VGkPtio0s6H2BJMseu/xpE/sOkfFsqFQsQDPg81oPGa+kz+IWn
YGvL9vliyNT7Odc86lKwwdumT1270fU71ONtTVOw3FAzbZaPVPCQ8/+qH5aM
YSVcNkadVCC/IUkqVydguhlKrqYtVCjabtXIb5KAdf+t6sAIVPDyGrNc+BGP
aWm6XVBE3qwwmlAmFI8pRj1j2tlMhSPPh5cP3InFVC7lFa41UuHPlgup7Ltj
MXXsT/xt5E6nIfnv5TGYyEB38VoDFaylBm0Lpu5jn+6+u82KHPu0/6OIzj2s
qKX4sWIdFS78NXb6MxGN/Rx7LtdUSwWxq31MFP9ojH+qesEU+b1gr/Kj53ex
VqMMmTs1VJhK+/iUf2sU5m/6U2WhigqvFw2OLxRGYrb3OWIfIgeYdQ31n4rE
VrOFdqkh82z/wJHoFYHxxXp9vv+eCsfj233Yh8IwSQFhVc13VGCb1+b5fj0M
G+4xt1+upEK/fltJG1sYtnG5o+s1cjfP/To2z1CMM1rHWBzZrjuaQXgWgpGf
Ea5PvKXCSszdfWHEYOxd0sWOJ8iSbJFJa8pBGH1ngpIkcjUhvLXKORDbH3xP
98cbKhiFha36PrqNbZgZZVYgB66H2OMb/pio+MgvPWTemuDMVwr+GPnI+N9d
yEV+QT2u1/ywP/Rjej8qqED8GXBsusUXm+m8kJ6K7FLmfz33tw9GM9Z97Ib8
97pfrrWMDzZrNjehhfxQ9tYnoUveWMFpY1txZNlZH66x2JvY275ICSbkpkJv
jfR6Lyzob6rEl3IqvGyfmiuieGImu+/atiJ/Ov3ZXFzjBpZUYTP5HJmlYbzx
cf51rKxkX3YKsoIqeb/AFnfMS3okIwjZ6u1oarKbK7bw5CbRGTla4dMGZ68z
9rUbN7RArng+6HT3sBNWUKe/SReZIjXQ/++hA+bX4Luuhsz+rPd44Iod9trL
/rAispJQd8HiZVtsspGtSBq5Sf7B3olQG0xkXO+SGPL7XR7yOiFXMImv5FDh
/5+fRfdEadAlzDdMK1MQ+RlNzEAg0AJb3eVR+L/TR9csQwPMsL9Mp4r+vz6+
Zch5xu885nXvSdb/47FevUrLnjPAeKieEf/PRz+yncvjuxb21CHjqgJy5fZY
k8DOk9gB4UU5VeTYhp/xgoTDmNxRB5omclSho/g8XQCjYC25JsgSL9cZD2T3
gFMvVc8WeeHUSNMmkyMgY1s15Y0s9MDzrsPFU7DstXojGjnvF+u+KQVtcKVF
0x4jz0j2Lj7LOg+DDR+aupEZqovfVLPNQKZNeOcs8to5wZH+Jxbg/mzJig2t
57YApxqm3CuQ9MW+VhtZMCH+RWaeDfjVRw26IPOZjJ3bbWoLmyx0xxOQhZ3+
nSo3c4B7ju+bx5FzvVKPBQ85Qovw58fsaP9JB+07pHfBGeg7ixyVkQ8nG4p/
tnCDNoH59ofIkuMfmdkPesFeO+lqN7Tfnex2/vWgecFD661bCpFLvluvDb6+
Cde7pTS/ICss/Fx4quADtV/uh9ugeFLdsnv62CE/OMF9eKsPisfAeNvPTxh+
8LC+sq4euWH7SwprhT/E5gWbs6P4PSN8arjv8G04xHZSsxD57GGHduejwTCV
2M2xhOI98f1rQs+vYOgz6P5rVE2FgRPLjUcrQ0AgtoD0HNlCJ7bqn9IdOLSX
VdsR5ZPyg5ZDhkLhYMvBObKA8k3dmdC2r8JRQFi+FOqC8lmB3jttpbtRoGEh
3/kDOd6I2hZFiwJex8daHhgVrlhZte9rvAvageeJgU0o/m6qdDjb3IO6kHty
5Sh/auTSO+dzY+GH14ZoZAcV9hfv01fnjIMdispKMigfb3995UO8dxz8GCF5
9CBPVXd9OKgZDw78befEuqgQ2V/U5TmdAK/FaYWTKL9/vaM4c/tBMli/+zTe
QqTCKIuhdF5HMpy5RB6OQfWi+66TU9d6MhzhjfxqMoT2a9yTGUGHFFBU9Dox
O4z2ZwbX9zqlVDjLL4UdRPVIuuz79z/DD4BHdXK30GeUTyae/gjfnQFVvDav
/HC0X7y3Lh3Rz4DTxxPT3RlUqGcLYpm+nQF1bz8r2qH6uf2ghZAOOQOkDP3c
zX9RoTaI+xxnTiYsbK+YObtMha17bpenSmbBDjWRufh/VHhjZuqfr/AEBA67
VGhsp0GoQ0SEXV4u2KYEn1VQo0FYDZOHRm0uNHpI24Uep0Ekz52LIsRc2KW6
o63vBA3uVwfJk5jzILGY3cMP9R+p3Lc+mdjmQcGNA3sHNWlQWOkse1osH34f
+1TdaUSD7k3niKI5BaC44513liMNhAp3SYw/Kob7/Uufw9JpsF9wYEqRvxTU
LC0LebjpsGE6I9DL8wY4kqtOa4fTYe/RpbMM83fguEjgN/1Hh+8By1xYXDWc
l8/V+OmFgzwLe2B9RjWYDFL2BHnj4BW3e7YmvxrC6MIMVl8c1p6otVbWVQMe
7ZvA548Dd0tQ8Iv5ahgx0b0mGYLDka1MtDTDGkiYD+Tli8EhJJe99zpXLdS8
WD6wB/WzBNk96m67akElZKbqTi4OmysPvHCWrIVHcTf5v+XhkNxuEG13ohaU
HrccfIX647z5+FOW7rVwJ9K3U+4l6neVt5dpfqyFxZFL9vg7HPi79iQLxtXB
dcdfX0K7cGh6fL1UKLMO/FqXLUY+4nDDA+sWLqyDjc1jhxV6cOjideQQxepg
2mmRb6QPh7CL5RGSv+rA0NTk4s5hHKjTOrfkL9fDz69JaWcmcWj752N1Sq4B
VNZ5sQsLOHgPtAeAagO4mURtD/iFg1j+ngwN7QaYWPr5OHMRh2AdbPCMTQM4
vk41G1pC3yOB85zugwbI4tGRVVnHIUcwF86vN4DOvjnFAWYG+Cv3Stl9bIQz
87xXYjkYYBqn7Hd3pBHSP7scWkJW+JLdUfK1Eezn+RRsORkwHe/uhq83Apt9
Q74SFwPOT7OXB8tjwKql4THAzYD9DzRPZCRgcNz/ucTUNgaw/ngRX/sIA7YF
46savAyYOMU3MV6IgaalUt0T5Idzn8OkGjFICzOdvLCdAcxnQtsr6BiMKVhh
dXwM8Aig7J+RaYI87Fra1Z0MsJJMHlg+2ARq6QKU18h6vZqBHEpNwB45o/EH
WUrq5Ud5jSbA/72yfyTAAFLf7Rs+lk2we36RrWMXA3RkdlUyxTTBYFR2+PIe
BigRu67wJSGznotRE2SAeEgom1RaE9ycmH0RiLxB/Gahm9sEWeSV42vIb0Ir
VxNqmmBjwfA+XYgBop9MQGiuCcgREc9f7mXA6ULpplJGE0Qbfw38imzvu65x
ZrkJXnVdOC4owoBivsIzrpuaIak5PSIKWdF4RbtKpBmYr347claUASYiPe0G
+5qhvkfaMwjZh5arOyHXDJXi8xnPkaviDPXZ1Joh6LNRKYsYA6Az56yZWTNM
Lm6bK0a2zfDpmbnUDK+VqXd7kSOd9IwCrzWDVQ7/1kXkjk0LxrkezfCT0Uw5
Ic6AH4Pt/Uq+zSCsz7XPGpkr/7FJZ2AzDBRKWd5BNj6tbYbfawZRo8uhjcg3
eQWHIhKbIWxR+yYF+cEk3VwgrRn2XHhstIo8EpJpcTKvGQaZD3UqSjBg9azH
SH9JM/xJ13XQRxYSPmPpUNYMoQGBc7bINrXzl+Lqm0Gz7mdlEnJ4TBNJpKUZ
XprvWS1AzrdMu/zmQzO8eSEhU4PcJuNG0e5vBtlWFuhG/r506urYp2ZoYSvX
mEDmaOefuD7eDNxHJORxZLm0WWum6WZwcDVl/ofseTT1mszPZsgzHnURkmRA
Covzl9rlZti8Q2ZdBvntwAk7o7/oe/FI+x9FHn7G+/XLJgJcPzpMOYm87PnN
/hYXAe4PK8vrIu+B2ml2PgK4Fhg4GiOf4ElyzN5NAJHXu+5bIF8dt59RFCXA
2qW8h1eQ77xSdW7ZRwAf75+xtsi5QVtnLeQJwCu01d0RucVgymXuCAG0hv8q
uSB/21P1I0SNABfvDMy6Im/5Eee2XYMAmuYp0W7IB6qvzRfoECBt3pDnfxve
U76ueo4AOmq8Yf/f72HBSftoRoBHCXTy/+Mn7Zv0sLEiwNLDFXE75IrFt/SF
awSov3ja9CryYMt9z2hnAogeH79+Efl36lXGnhvo+vUvN88j77I7cvO1LwFS
q51s9ZDVDm9Z0AgiQOxM5AlAvsxE8R4KJ0DKRTMmZeSQvvJfzvcJcEqVUXYA
+WnOXd/1RAKQt/kb7EWOP3/dyCuNAI95TbfzIgeymO3/9pgAlTPne5iRnSvV
WKzyCPDZJjV0Aa2fuZMYpbeEAAfjVPZNIZ/ZveW9ZhkBWqutm/uRFbtoSdXv
CPD69kGzRmROhTrNPAIBnqsbW6YjL0/m7t31gQD78mkfw5CnU+4vx/UR4Kzj
B2U3ZOz3hZe3KASojRynqiH7NjD49JcIcPnVSVo32t92niPUhg30fm8jd5X9
Hx/ije1HWFtgJNpLLRlZ9m5coDBvCzz6xulojDx5VnoKP9AC8mIits0o/rr/
ctc7HGoBbx8Po8fIteW/0sZUWiDZRljZF/nhjmb9Fs0WODccj0sgG1AuV6Rf
bYHud8Wivij+jyWeieNyaIHvZaQJbWQpjQOOYW4tENfu+0gA+V/+0m43/xbI
Pb3K/A7ll0r3lLCTKS3AoqdV8g3lo7y9AVZvMlqA5FtiUIac1GetJJPTAsMn
Psz5I7sdlZ/lfdkCB85H7NuMLLrebjzd2gI/574kCAgzgPv16wOXPqL7ew7L
jKL8t2b9kLV3oAWE6J+bMpGHCLZVVRMtqN9uXRJAjo3dEIlbaYHwh41+W1D+
XNxzhH5YvhVYWRWEa1A+Xtma/+XYkVaYSZNT9ELeYN4xfFK1Fa6lsblKI2+a
+12nr9UKyu/KTJNRPt9ZWxNje6UVNtzfbrFC+V7F6vS+lPhWcLrMadCG6sVx
oze7M1Jb4cbz379vIJ86I8n9JLMV4sMKe3ch68iy/SopaIXYL3NbnFG9sVjr
bGqqb4WEcIfCdVSv/LPOX2FQW+H5xfQff1A9C05sNl5aaIWMkMsPspDDIo5o
bqy0QuZykZcK8n23HbLsbG3Q5pDT4Y7qYebx0WXRvW1A1SL/6kb1s5pk88D4
XBucMksvdd2MvpegZ1fp6zbY2X75lNhfVJ+PMqerVLbBnr7NNvx/cHA3fGDb
WNsGDmqJrZs2cKAEVa30dLQBMfej/dQqDo2Uf9K0L21QxlskGPMbh4ic5Eg5
gXa4PV7++i4VBy6JN+oloe2wfkGVoT2Gg/CB36W5xh1w/1KV2clSNH7k9oe1
FzrgwZ8w85lXONSOH7w9eLkDfu34dTAR9TeXUp002Vw6gM9v1ItUgkP6+siI
S1gHvJkRtXXMx2F7by3ToYoOOBKyV1MnE/VPPmGmjXyd4DRtzALhOOD1XEuk
4U6wPmzr7nwehwzWx+Fu5l1w4eyviIZZOly+6LPT69dHMP36sVzGhw79hyhc
9X49EFLZ4aHPTge3lU/8hiE9sPZH+UDcZjpsahoQIkX2ABuPX17PJjqoGXfI
rST3QK7T70/mzHTI83hjqPSyB9i3BkVeX6OB74v7ca8me+B9j00LgUqD3VLK
XE/0eqGritNlD5EGtrsSOUMF++Co3iGHyac0aG/OcqeL9cFIQXG2cw4N5K8X
d1vL9MF4u+Hmn9k0WGlqSgSlPsjfmPHZkkWDRLdffMxGfTBx/+X3Mw9pUNtg
KRQV3gcVMdeKft+nwQ4HSfnY2T6gjb4dvOBDg0CeQwlr9D6QxxnWW7xpMFmt
Tnf73QdKT8qNar1oMLxZbnQfcz+kd1fYSt2gwbPLWlmbefoh8bvCHQ5XGqiw
+Yt0yvSD6G3i+G4bGthbUqQNL/cD65ee5QtnaZDXKzNtaN0P2EdBIQNDGnzW
8sk9a9sPTwV5HoMBDa4c5hQ2cu4HFwnmdwp6NDDnVN1u4tMP/SF+Hnu1aKBT
/2DdIq4fnkXk955UR/27mGG/XR26f2/QQvJBGjilpyfYN/bDPQOL2DfyNCjg
njJwaEbzxzRkD8vRQHw1oM2xox8+fIhSEpOlgSCxqNZlsB9il6k6HdI04Ipi
Kbwxj8Y3Snt+VYwG9O81twOFBsBhb1FB+Q40P2OnZL3IAMzt7721yE+Dpys3
u/+IDwDt0azoceTzHLKi4fsHwKhAhuUjOt9UyGa13lMeANV/5TtYt6H19gjc
lmY8AMLqV/f0cKDzya1P1Z9MB6DwW/+QAvK+0CN2uy0GIIf0yzeVnQafEucq
H18ZgPH4aUebLTQ4Vm5llec6ACzJKsK8bDRYWzheWBY5AMmwdq2HiQam6+lG
P6MHoD9qrPwc8kvWX8tHYgdge3gHvQ+dv67seGnwPnkAlt4PqpD+ovO1shCj
/skA7F04w7b5DxUETvk/+vtsANwfnRpM26DCDZ3BMxoFA/A6gu+BDLLIxbi0
lhcDEM+89uP8OhXCAtaPd1UNwD9XDaa6VXQeDbs4zVU3AG2t91yskA/HvE04
1zgA2KFPbesr6Hz7yP1zf+sAhMb8vKaFrFVHvjsyMACx8kEStCUqZLccU9wz
PADi/xzUs5F/f3wwajWKnv/Ej3PnkIsohnITEwNga0axfPebClv+1vVPzw/A
bZmCnU8WqeAmM74Zpw9AhQ2b2jXk3vN/1Vd/DoBQPmPHPuT0fI3nW1cGQO7w
1uW36Ly61m07uWt9AL53JfwJQbZeitgp8XcASFuPNegjS+u3hatsIsJCc4LL
zAIVYr1nqjS2EGGpOMi8Cpn+eAvdgJMIo2L8azHI7+j6Vja8RODXfemthLx7
t3uyKz8RMhLGtbmRg0/Ht/sIEMHgkfDgN3R+1nrYe+S+MBF6WrYJ5yCXNOAu
qaJEyHw6MxKMzP2d92m2BBFSarcZXUX24j0yXLSPCHd6M0IBeVDNjKtiPxFq
amJcJZFV7H1P18kRQeUOnYcDOSs+zb9NgQgPdHpuMND53W5y5OuYEhEED3Nb
tyK3s6/umT5GBIfLN2nlyLJHBM/TjxNhJc3q2FPkxMsnoldOEqG/qe1EEvLP
qCv1LKeJsPlL6VoYsnlpyAK3Fvo+Yry+vsjVIzn7d+kSQbf/S7ErsjBzk7W4
AREUHQTTryGHyX55KHeOCDf8S09dQp42Y/mofJ4IUV3JuWbIeiGSzBpmRBjU
fNNojPyqSOuYgQUR2nHm9HPI2/odPcwvoe/P5CHzv71Xo/OtrxDBqn/C2wj5
k0TJmIsNEXzGNQJMkI+f/bDNx44Ifr2BxyyQc27NaYc4EiHSy7scFU5gecoV
fM8FzVfF9dUB2alT/k2KOxEY2P6+G8hdP8/NPr5BhNmPz30DkQ8KeYoU3SRC
rI7H4D3kZK1k83JfIjwhGM+nIy96VMTW+hNBbF2uvhjZMoPY1BqI5hskadf+
//+Tpl9LvSFEwC8evd+LLDa34+BYGBEiGjgjp5Gj+FXsv0ai/WKnpLKBPKt+
8REtmgicfeG5O9F6GjoF9C3HoPEqCa2HkEuTHrGxJBChkd769BwyX03tCe5k
IpAizY9cRyZx/SkWSyfCzKszIaXIp5RFJmQfEYEgeUiZiJxnDTuUs4mwXteZ
v4zsWhEepp+H7l/eVKCL9uuKxeZL3qVEGF6KPrCBTLhZfsKjggjS696p8ig+
4uKtRFwqiSD8aTbHGlmEUPr1ai0RHhmb5XYgax28eEO/HY2vSdd8jeKPR4/Z
ROsDEWgV/5rmkEfsXh6FbrR/fx+ePIDi2S3z34oSkQhvOgv+vEJOYi2JFJsg
wgGuPTXtKP4tRUydhL6g9z2Tqrx9mQoSaht6AtNEEKqxPH8VufLGeR7uOSLM
iWvZrCGTxlYyl38TYd+o/4guykfS5fqlvVsH0Tlty6AiymeMrl/JH3gHQWXz
KMtD5JpvT3xa+QdhrZCvaxX5rNCCau2eQUj+PCjchfKjd3RWS+G+QcgdTmwL
Qfm04cr8aPDJQdC3+FZ6iJUG0f5pdf4ag3C7omRXKfL5VMjx1hyEKBPzbQc3
0WCq44G9i/4gmKlyP1dE+Zv9qDrd7MIg8FievKWL8rs5RwKrnMcg8G/2/9bE
RQPV97pEJy/0PNKyXfbcNBCyZ8nN8xmEA17ZAexb0Xj1/qcEAwehzhAUL/LQ
4KaX3W2Oe4MgoJIwx4HqT+LIMfz7s0HQMSZ3tQjQ4EPhFKlgaBAucP42iZCk
wSvTJ88/jwyCoV5k2hUpGiT/uxggTB6ELepfI1T30cDyUs/Oh18GYcXygcVv
VB9nuKvPR9IH4cvzguYIVD83+Sa027IPwQjz+6fzh2mof1V9I6I+BNxv7b9Q
T9PgIG/1VkkYgmGTjaXvZ2ggPHHMVebMEHA8rbkyrYnq1+1jYof0hoCrS3nH
F20avK9QSTxtPgQ3sAX+OX0aKIgruzlcHwISXcpSzZQGokxHJF5kDwE10Kmh
1Z4GTI1yqcp/hqBHU8lIP5YGHCL1Y4FMwyBVl2r5Io4GfKFnxZtYh0HAyjWJ
OwHV11Me5Qacw/D0nk3QUBINDBpLe212DQP3NV1B7zQaPGw8zBV7eBi2d3hM
TD1D/QV2LGrCcRgC1/8lJ1Sj9WzS9LvXOwwXs8XssudocJutIG4j5RMY4B+Y
u4zowF2g0ZJtMgKqY9qyk2/pcPAD8z9/8VF45nTt6M69OHTT363ckRoFf1kO
qzgRHK7vcFu4JzMKj6vTiUxiOLyyIX7LODgK/2Z03/6QwEF+Ka+7Sg39nXKX
/e1+ZEmtrGWTUfjurlUhoYSDbEi0sn/EKHwT3fTM3QCHrrzjinfujsKH2GTR
D4Y4uHXS99+7Pwo+p2ea953D4QX/ReGMxFFwuaXnSjHG4cALGdaqrFG4cTJb
CC7gsH+ks3/pzShYBgWNjNrgIHOY67rf11EY36UqZ+6Lw9Rsnwk2MwpcVO5N
pbdwyH728Bj73ChUfztbtNkfB15eEdYsxigI2CdrVN7GYYV+KKvhzyhY0Hme
Mt3B4cMri85Nu8eg8WrWsysxqL/fnyf14OwYaEUKLQo8wUH6sxMnxXgMfEpG
F3VycPicIceQMhuD3Uz6ibee4mC+5V3d+0tjoHwt725vLg7qMx2mJKcxEJ9V
tfEswmFrAS1MPHwMDh8Xjncvw6FMVG287B2aT+1HrlYTDr2d0Z4/qseg933k
bY1mHOg3h5gl68dgvHi29zgBB4VWT+l0Apr/dgldthWHUpciz+C+MTDLu/d1
pQOtTwU/i/6PMYiVO/3OoA+tp5XtwwjqGLzn2/XjYD8OVNYy6Xp8DKJI9Jht
AzjIWRgYKi6NgW3AO55eIvr+a2EPd7KSYO5FNIfqJxxKNOnSU8IkMMhh/Gyk
4NBJPVEjJEYCsfusUffHcZhNizG8IEmCG2qavucn0HrMSnl1HiDBaMqYO3kS
h6L4yzWlKiTwbOh4Oj6FQ8Fwp2HQeRK4t0Y6pM7i0BoqMFFpRgKWW7F+p3/g
MC3j4EW3IMGvx9QxOrJk4L+HtldJUEb5lKI1j0OeiMqErhsJbptrvCHTcMh1
zvfaEUWCXd0ywtUL6H0Pv08SuEeCltZA3jO/0Pqud5bujiVBRCMW1YVslEyn
CieT4IyC/PynRRzWqtVc92WTgLFXI298Ca0fZ7+tSiUJrjVImeet4XBnaCpM
tYoEfhx2vDvW0ffJ+f30eC0J6lZCtKOQmY4KTZxqIsG5mLbd19D58vVlJyvd
bhJMbd1ziQ2dRze/3jC1nCaB4Fn51QgmBhz23+Zt9R19n7bq+2XIV05LpFyZ
I4FX25oJGfntsG7fNQYJmOO2phxiZsC1v6mGrhskUH3+tOH//y/HdRa6uf8j
QSz3pl0ryO9Tq2M8WMjg17zt+V4WBnDLTHTcZCeD7stCPyfkGuMDWoE7yGAS
+q6Sjjy9R90+eBcZ3J+r9vOwMoB32igiVJAMvBUxkgrITgG+TRFiZJg8q3rT
DTnlzL3JKEkyFHq4ut9DrufO+hstTQa9qG1P8pH5cjH1OHkyENrcisaQT7oT
LycokiFeaC3kF7KL8rfApCNkkG14E8+9iQHYB86aB6pkWDW/aqyOfH3hgnK2
FhmeGy06pyK/MbqtMalLhvBInofFyMsvsg0lDMmAtUQO1iFH2H+1LTEhw9zS
2fgvyB3YZo95czJsSopl+4XMLSwboGBJhi/BSymsbAzIGPJKrLQmA+dJtWlx
ZMqhh4+WbdF44ywvFJElEqoKjjuSYdnrc4Q6svMPUlmICxkyj/fe0EN+pf23
tsmdDDH5HzzMkBdyxdtZPclQrDZw5yrysb9aAzreZKgpmy5wQg62cqHE3CKD
7fim8RvIhPdx37sDyMCFHd3vh8zOX7awLZgM5Fu+0cHI5zyJf0zvkCFH9+Ny
OHLqx9/s6RFkKM85GRyNPCqzZ8fYXTJQOYj8sch7o9RFhWPIkKye3BiPbPfZ
RtYmngwyPOHBicgl6pHKeUlk8AosPZeETMss0viWSgbIlTzyv4/8/mC4P50M
zu3UA/9fH2BCs3B/RIZUk13K/4/X8JrXrjSbDAd7K8xikFk4lTx+PiWD+vzH
u3eR9ZwuBijlo/GC/D6GIScQAiP9i8jA49siFYRMFMlJrH1OhjJ6W4ov8u6g
5kd/XpHhqEwqnwey9ch0gUY5GRKDTxY7IOcfZS+PfEsGT68J48vIs0lyde3v
0X4sjuc2QVagGrVz1CJ/vzaujeyj5z1wtoEMp/fcIqghVxekUZKayBCqN10n
j6x5lbKws4MMt7y1qduQ79f8+2PZheJBzkeSCbl3pyRHdg8Zflzx8cTRfrHs
dRWVGELry++p8xE5RzZB1nGEDF3WZQNVyF+jy5VLSGRglBp65yPfgGVDhS9o
vnMKi/7IlY8FL96cJoO8PWH4GvLq8km7yu9kIHIZ9eghR5VHBRynk2Fx49ff
nchd3CWRIT/J8JXNUW0dxcc214+JTYtkkJAIip1EzhLnK9RZJ4OW3fmbhcif
Q5TLY/6SQe2Y55b/428fybKum5kC28IXKp2Ry1OfDpiyU6Bj54KFNHIb68G/
1jspcGqmoD4TxbtA+M50t90U8E7nfHwL2envn4N+QhRYVJMrN0FmX+29miBO
AecAmztbkM/SvRrqDlJgzWd7lSvKL0/cL13oOESBn3faz2sg02dP04hHKVDq
2S8hgJz0lW/vnBoFKgmYF4byF3G0Mni3DgX2btWqZUeWtHiyQ0qfAhv+BWpv
/uHgO3j3leJZCsjVsvuYIO/staDomFLATSdDKw7lS8uWlRO3rCkgWfrKi4ry
6cRr9fUBPwrwmvLbOq7ioCi378H4bQq42P8ppq3gEFayVe5HMAUC8gvdfZHF
8yesmCIpoNwW7R6yjINDZlitQhIFXsSCdchvHOYiWm/HFVPghta1LOWfOCxd
PLuiNUoBa1YHgfjvqH62N6ifJlNA+/XyndkZHOyVFcNPTlBAq0gxVhO5n4+P
U2UaPT81MPL3NKoHPSNCMgwK1E6dF9FH9e2qpj1wsI/DwirHszJUL1sVAqN7
jo0DpXXd+w6qv4FP5rs+HB+HN+kn/SpQfT7MfXVb+8lx2GZ+QGmqF4ecH5DZ
qDkOMWIZX6EHh4ACthdlxuPA339KlvoB1WvBlJ4U53EwnropzdGCQypbyQ6L
jHGY3Hcn83IlDnabZbUfZI1DHb2VavIWh6NbXt3qfzION337ZnTe4DDEXv7J
oGAc+MySB+TLcdjFXZ0JFeOgYF9SPPsS9Ut8ncIHPo6D9EhQrHg+DsWis1Ib
f8eh6h1ZKC8Zh3q1/cp5ThPASw59dMQFh8zLngvFrhPA70d9ueiE1jfkfdnr
6xPQ8vT4t3eOqB9s1pKt8Z6A7OL5AWV7NL6erWh/6ARcnflVI2eNQ/DFLI6/
6RPonE1ZZZjhcPIW98Sljgm4IWPDNX8Kh8ZyRvT2/ZMQEZBpROdD72vxTOOm
3CQIrz3XvrwdB+cN47V+hUkIMv6e27EN9Xd6ZR7JypOgU3c1NYcbrd+kh/k2
zUl4RyhJ1N6MAzvPvPhW60mQYT1DvL1KBzP3b/XsDydBN0szKXaSDvu3p/m5
ZExCu6Geyew4HTbeax3qzJqEnR/PNWhT6FDEUpB/L3cS2KL5s/+N0mHlkV3s
5rJJyDQvrPAk0iGnc/Lipq5JMJd6Jq3ZRgfvG0nbHXomoX51IjG7hQ66O+Bj
S/8k0K1FWn8304Fhk3MqcmQSXpAcc4ob6aC5fGUfy7dJ8MtOMuaopsPuJ9yT
trOTcGBM/6rtezpQz9RnNs9PwrHENP2aSjqkJwpxhy9MgrH1y3aXCjq4KX1s
+/x7ErJTSJebyugApMA7GquTsOTsOLqrlA47wmTVnm1MglJg6CnPV3SY3Uda
+PdvEjhtLZPbX9DhP4De89M=
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577163035*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVj2c4FQwDhpUGkgivjFAkJMkoRZ5CEqGspERISkhmLwpFijJaooEUFSXe
koqGcWxnOStUVJoSZw99fT+e677u6/71LAmO9tw/U0pKqvPv/s/i2KtnJupa
UNQ/+IKbyYZOIu+kyXALXOo421jpbFT863M8XLYVjneW8rOOs2F8vD6pwrIV
dsUetyyS2XiYrhT7PrAVeoVls9yS2LDMjI7UymlFIWWWZncCG43ZvQf8nrRi
pmr46q3xbCB3RfDFD60oNX68tyKOjda8M3uI8m3QP51J1vnbt14Y85W3bkPV
qI9TyV/vu7x5h3NIG8p5gQn7EtnwLr7leup8G4w4mvUr/2WDeX2G06vGNjyc
pP8SpLCxtyxwo/hjG1Jdabq1aWyMVjStt1ZsR/ES5beLstgIr9K0irNpx2Oe
x6X0HDbG7x9bVRvWDlJvrse3fDZiH9KNfhS0Y2St+M7tIjb4dVb6hk3tUNgr
GAgvZSP1yQXt0C/tCNCqrh2sYmPms9+LSpUJOFyu8CC6jo3sJg/lQTsCel32
E0xfsDH/dc38RYcIkA57WryOwEZh6zwZ70sEPGxxz/Iks7Go4+DM/FcEWFfu
+y9/mI3r3QRx93cCvlvYHvryjY2l/ct4c9U64O4tH6/LZ6OSfPK3g30H+PMq
os7M5sCE9uH7icgOWLxY13RWmYM6Jj4/L+pA86UvLNISDtYOXX/Pa+nAq2Nj
+2PNOHjxXsSy+NWBuKbXsw+Ag00fdw1Ea3RiTrWsbZY7B+1jDf33N3dCzvmZ
tDCAg23fVbvGjnTCUosSeyKSA9J4bKvetU7YTs5ocU7lwHeS1BxI6ETeh8ks
rXMcDHJWNZZMdqLN0OSy5nUOggTn6umLu3Aw53usbg0Hn8Xfa5S3dqHk/q0a
NHEQIeVS5RHXhWHLiukjvRxMSFeV59zswlY5h5MVQxwkzJ1zndDVheaNJkGj
PzkQyYVekeZ2gTuy5eDyaQ7SFN4UYEk3DAR5o9EKXMxeqJubvK0b5grNV9q1
uTirejyrIbEbB9+pnVu8igtF9cG0qfJulNXGZMSBi0ta65NX9XWDkd6d2O3B
hYZuUXyEoBuKXssilwZxUarHja7U74Gz/ongY0e40F/ufWjUowcFOT+nWWlc
3DOuC9VJ7sH5rJd+Gwq4WGWqGLj7Tg+y0wvqbpZx8d/qqF1XSD04lRIiP7OO
i/VWPV4UcQ/SEq3CQt9w0Wxt7L7AsBepR+e+aidz4Wib7ezq1Ytt62FrMMpF
Jz7bnz7eC+Mz8qsyp7hwd3Dc0HK3F7IM5pKP0jxQncrX/qH2YsygUsVBhYdd
LlLmNlJ9aIuPm1uuz8Ow216TxBV9qGjdJJSy4iF0xwuDet8+KB7a6eu9mYcv
3hpLfqX3YX0Au6Dch4covyTNFTV9CNle0Duxn4ep3TTVA4w+nHMwlUUCD0mB
loq3pPvRsKbb8VwWD9PBhXLvTPvxwSg87e1lHjLCJmZp+vdDy9dtllYlDzKH
3P/4ZvZDgVxb7NbAw7nIakFhbT/+uKmsPkHgYWGMHLvvbT8mOhMJtXTe39+W
iZnSRIxsfhswMsaDgm1InJ46EZTXdmxlPg+kDYUxr02JaNq4YZ6dDB8X8Toq
0JGI2w1yPs6L+PDdNBEh2UVErinjhqchH+oOOgdLoomIu337yx5rPgYd3cPW
ZRKxRyvW/IAzHzecUkPoxUTYX9iYEuPHxz7n6qD4WiKM5RTak8P50HN5G6Dc
TsSq5UReQBIfn13ldj96S4RwJC5xbTYfVW7r/Dx+E9FyQ52nWMRHhEe4z885
JOT5Nyd8q+TDdMcVzxwtEvz/CeG2NPAx4dnuYWROgj55bsJ1Ah/13pxthC0k
TCF8XjCdjwRffZf9ASQUTgV7zBzjw9rPa4t0LAlmlQEXyrl8iHZlOJZlk9Dn
70e3nyNA8+5Hm3CDhMMKXpqjqgKkBby3G6onQe6NW+DJZQI4BC6wTe4koSre
+ZaelQBz9tmtU39Hwi9z5pmbjgJ0BEeuaWCTIPPH1U7ZW4CzodcsfOTI2Ghn
8fZkiABuYd1mUzpkxG1dMv72qACK4cKVBVZk3PVeMMMyQwDyQaMVq1zJkFfS
H04vEOByhJ9hbxAZz2fMpL4sFcAv8vSyiAQyDtv0M/kPBdCIfrJUNpeMEdWK
aI2XAgwd+aRTWUbGk4PzOZp9ApQeVVm8uYGM8fRUE9UhAYLjHDRGe8h4mhLo
OvJdgGUJR9XSR8hIH/I1LhUK8CWxTEWHT4b6jJG61bJC3DtGVGqaT8Fjc6JR
uZoQkcl/FHbrUXD7k+cJRQMhzFJN5QXWFHQRr7IWWwoxeTxA9oo7BRPP31ut
sBficVruHKtQClQqlxdYbxciMeO5NOUYBa/HtCm9AUKsP/VNKiaPAtPSNUsC
IoQQZ6pPK9ymoNjPPfpHkhAvTzuLqp9RIKMU1pScJUTGmUS+C5GCpEKt7Wcv
COGYc4fz5RMFrUtMNK+UCjH33MBkloiChY9sPt+qEaLr/KwJfSUqKn+OJmU+
EyI33+LnGwMqGhWeuegQhPAoDP4WZEtF96p8rUaKEAsvFoxN76BiaHvYuOd7
IaiXXn28doCKnd0LbCp+CHH5yq8P61OpSGClJjL5Quy6qv2OUUhF0dfv9Qqz
RdAqcRtMqKLipUPxoRVKIgxfS2GqNP/tXa2/ZReLUHbjPq2OQsXRHb+SvhiK
EFrKomz/SsU2hroUwVIEg3JZ0vg0FUkaES7hG0X4esu6L1dlAI8sM2T4riJU
3z7QbWw8gK/uV9tP7xQhqvJyRwcGIFk79UQlRITVd9vawnwGUJF74drOKBGm
7rHfzIoYgMsHi4ziYyI8qdZ7VZ42gN9W1ANDp0RIeuDZtPHyAIrOxrnp5otg
U5v+bPj+AMxa+E42JSJMP6ptSHk9gLYF+YWWd0R4Vf/uPw36APz2LB9e+UiE
k48V6p7+GMCPqmaj5S9EcGrY8NB3Jg3pHJ94XYIIMo2Hq9lqNHyOPub3mSRC
97OSu4UraWCv5e0vHxTh/IuuO2YONEhLxcfuHRNhe7PgVp8fDUodk2kakyIo
vzIsOxxFg/JkTs1dsQgDr3fekDtFg0H4geLVc8UoaskqqbpKg/Ww/elGJTH8
2x4XOT2kwdVbO26TlhiLCR8vfWylIbtLrbPUQIz3HcoXMlg0aAQttOWaiVHe
ZZ+vO0HDA478Q1cbMfb3xJxrnk2Hfc7cpWWbxTDsKz27R5MOrxjt7AEPMb71
958WmtGR1hK1QbxLjBrS9KkiJzpqVV9OLg0V4whlZcaaPXRky9RscYoSw3xg
zwlqDB3yySkz7JPE4NByUo6epiP/p+vzDRliNDCeHVO8TodqkGb8ulwx/mV9
TXhQR8emQyEXF10Ww3ZwUdy2DjrG3ySffn9TjD9DW2K+DdFRrHnx36q7Yrx5
lxCVPUXHlrjqyCP1Ypz6cDvCQJaBqZ7WIOsmMbaMUsNbtRmYVmwZHGwXQ+6T
dFiwJQMKVSmf/Ili9Hw2D5FyYUAba8YZTDHyvuwLuhHIgDntF9d3VAzPb/kB
tvEM2Efe/UP9IYbKj5f+rLMMeM0KkfHiikH/Ob4zqZSB/SVaSqQ/Ylz9tdjn
nycMEDe8lDKVlWDP722e/3UzYLubUeezUALtqWQPzw8MVCX9Dk3VlOAD+962
CS4DKpfl1G7rS1DBZW49L89Eer1eZ89KCcL4MltMljLxk2ibzF4jgZFwrWPX
Wib8x31Wam2U4IcobFO4GxN1osgF+lsleCC5ZDcnhAmVAMcI8Q4JYv602lQk
MZHQrEGg+ktgMYNtbX+eCZrO76U1IRJwZ+qteX+LiXXphOOZhyVonOVpcbyR
ieKR66yAeAmS56SbafUz4WStfWLecQnsZGpXPvvIhHj+fK1rWRJIyb0z9hMy
UT8qemqSJ0HLPAVD7gIWDjV+82m6IkHW/A3LLi5jQTePOelWKoHzgsNLzW1Y
oId25A1XSTBPqUSHuJ2F6jMXXxg9kqBvYZdWVBgL5jWZa2IaJchXEajLp7Dw
lJhQ+/S1BF7/GKrdK2DBjn3AWKpLAtVFO1WcK1loVdtVsYUsAUM9S+nzCxZc
bVy081gS/A8hfmoE
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwV13k0VP8bB3Bky1ZKkX2NjJAoLTwfS4qIULYiEiWVXZF9SZFkL0tZs32R
iCwzmBk7oZKkRhGFJN2xM7/7++ue17nnfO7nPp/385x7pZxumV9hYWJismNm
Yvr/dVBNhjPt8DOS9m8fnsciCKl6N1VysD0jzZqfWjHiROjar2PiKRsZJPXM
hrNrX7WQYgWX+rbODJJG3HMf83otNO3zyfB+cgapzyTT8EOKFnJj8vcNImSQ
WIrf6l00wS1Y1XPF5ikpiYUs7Ek8jtxOKAQeqkknBUgrbAsuOoau5wgMf3RP
IRW7lOX+eHoEKbmO/z6rmUKSv5TGZBV4BM0qVW3p2ZJCInQ06c3ZHUHudaYq
zU+TSespyr0PxXC/fRBd1JFEAl4hiMvVRO4bTBp3ZBNJPw1EehxfHUafq0Zk
NOoeku7HFRua/9FAhfy2xJ1nH5J2B/lFlL/XQB4en6wXfsWRwuebrijWayB2
5eGHFSJxpK1roSmhURpIrfjD0r6QByTP+Jy2XDEN9OBZf7e4wT2SgbfcjucW
6uhoXJs35/tQUqH1mbXED2qIbeYE35R7KCk4QE8ml6iG+g2pRVS2UJKjtG9H
zws11MMX08B2K5iU/dudzydADcmwRTxa1QgkNbHJETik1NDg39uHJ8g+pEtX
7irIeR9AzUpJYl+DHUgCnh+/eCmqoteCN5QMgi6QNBTFKrmEVFEpy8lj5YE2
pJVdQ/q1bKoodXjVOvi2BYmVeK0hs1UFVfM/OBvQoUXS6Zf6MK6mgiZl+rDn
T81gd94WwyVhZSTzpZuZc78HZH/v0d/GqYRcnHZt3vjtAYS1WwliPwmoaMp+
9d1/npB/013drIOAlBf+LjxT9gYplpppqfsEpMkhNHFY1Q+s1xhfvHgIyPiA
c5vrwbvw94Nmd/EeRdSgG0wdF42EMJ/iGTcTBZR/quaEelQkfJpaprqqKKC4
M7PUyN+RoP1HhHGfXwFdsLVtkyNGQeOEx5jWkDza9DzU7upwDxTFpkvtHeUR
ypnrmMl5AO18gS4OwXvReIjK5J2kBKhjk/ilPSiLhllO781tTwAdqueOtDpZ
1BPl4tK1lgAiqSH3tj2TRdWxWZPCzo/h98Zm0yV3WRSZxj3VoJ4Igt0SBqGc
smhvxdTUxockmOaLSEsykEFXvz77FSaUBrP7Iwk7PkmhHV68i2qGaTC6W/Z0
DkUKNbIFskzcSYN/DX/enKqUQvz7z4sYfE6DAE874bF7Uqg+kMeEKzsdxE8N
MStrSiHePXcqE2WeAn3m6HOVLElUZWHun6ecBSXbFu6pzYujC1OkCEuHLMB2
dB1j7hVHHIH7E9gSsuDn42TD1WL8fi5nsevfLCC4LtS6OYsjtr/EEUJ1NqhZ
KvTCZzGk1L5LYkT0ObwQQ+OJ/aIo2Dk83Ck3B9RHdpMKh4VR6BumG6g+B/KN
XOKYG4RRBF+IlfhgDvA35LeFZAmjmLpApRHmXBgbD5764SSMEnl8h8465kJ0
8LkSyz97UEG1q6KOZB64sxofzODbg3pYTQYlsvNhOtBcqeeKIOqz6W7cqMkH
Sm9PkbGxIBooN3zxuTcfvGP2cs6qCaIha4O7aRv5UOj2bSqaSRCNlcHebRcL
YH82Z/C+rN0Is1QL2BQpBEPeHm620V1IpEBQ+suTFxDu8Pej+i0BNP9A+Ebr
qxfgwD/6yN9KAFE8xOpe9L6A+YcW859AALkflznjxVwEzTlcOze2C6DGd8oB
HNeKYH/YTEtd9U5kz2IweECzGJZKxS7/YN6Jch18wqOHSsC7PlNwTxU/8jvh
33t9vgQM+M+7cmXzIyNCgNBZrlJoZPf9s/sBP/q3GFIuol0KA6nqcmFO/Eg/
PnaksqAUusKkUlIF+NGPxly1zz5lEKO2z7s4aDtSEB74rrKzHA6rOn0iUPmQ
FedGkg2hHHSvOb/KK+BD0YsKJyL0ymHvhQU9/Wg+9GMw9MWQdzmMZWq+3TzJ
h3JjVd2D3peDk/ZitGUvLxLdeETvSqkALvfvNFsaD+L0kGc9GFcJLhZvZZ9L
cCNJ16bRk+m4+YrvD7Nyo8P2FjUX8ivh8hZTdfVpLuRiHOIS3VgJ4lFjdZY1
XIiq8LHj02wlLIq07TlkwoXCv0U/DDV5CRodjEyriK1o3Xxydx9fFbj9HLfc
ysmJ7iYSn02KVEFMTabunT8caGMgVYGhUAXuJY2cvB850KbZyaOqelVQlUy/
9qyQAzGZFl1M9K8CIfr+bLeTHIj1tFv++bEqIKb4ufo8Ykc8enMHaC9fwXOW
wTIlTTYUF95Wv0R8Bcn07TIUGTbE25qtt73nFTSzeqsGbGNDfDqm53QmXwH7
WUlfnSlWtB0qb+cJV4MJa/4tzXRWJHDMi+QaUQ0JC8VbXzC2ILGDi8bzljXw
oW7/cPQ4C1LXXLjX7VgDrzN3fl8aZEHGWnOthTdrYGh9dGt4KwsKODmpeTGm
BmYcTqp/y2FBQ3ZDsl0NNaD0pjuy3ZEFJUS+Xs+Tfg0pPIV8eyaZEcuQX5nV
/GugnFEd3WQwoT2fvabUNl5Dkq3qZ+sFJqQ6dlOaj6sWnP+pnOiYYEL20y7p
FJla8EqunJ3sZEINm+cjD1jVQq2CeaJkChPykT98gZtYC722tIkbKkxo6vYS
Nym2Djzyi5tv/9gEJRbOgMa0OiDc1zqV278JHrFCP9/k1QG7q+C9mYZNWM06
QqluqAOD97aPRxM3gYcceLdkpg70QxMq1XU3QY2X6XfK6TcQ1iHjklm4AUE5
nH3u3PXAl2Z4zThqHVoV9xx3E6wHTomsF3I+68Beva/EVaYe9Lf1SApfXoeE
NqNop2P1EEO4rG2psw65M3Ha1tfr4bGazP2tjDXo0OCv0Ouuh7pDdtN2IWuw
s2tPgnBsA3RV3ksjJ65Cc4Z7uUh6AyTH21ulR6zCzRukHtGCBmgqaImK8VmF
ru1XtkqQGuChksvT+vOrEGpVGS7zrwGEQ+NzHUVXYXbCwFfJrhGc37XWZ5St
wNPXT5L2X20EdSn+m7ufrcDJmNmXyr6NQOcZtCx5vAK5hMQ51UeN8P1G50Ex
/xWw9vriqkFuhIGysHCC3gpQGd622oQmqMgY1OmlLYPXQNtt0GwCN3sL/+53
yyCZtycNnWiCHeds3o61L8NdA9I7XYcmEC1Xv2pWuQxqD7lMTiY1QaDp1T4I
X4Zs4RwwW2sC2Z1ePvqKy+Cv0Sfr1E2EdWU/zl0PlsA8VsMv6iMRZKP7XtuF
LYHyt8z2onEi2LvOW7+6vQQTcdfd/qwRwUZSWzLFdQnMJjgr7yqRAG05d17S
YAkUkvSOpT0kgR37m4e67Euw5VdJXP0TElxMNbWI31yEr9o7vn4pIEGWaMfr
X4uLkDw9FipLJIHmImJ7O7UIzLrBbS/nSLD7Wm302a5FuHF7VGFSvhmkt0hk
yiYugq1MwsDS/mYoslcbuBS7CKf69AK2qjeDfKq5S2nkIsjKlnYroWaICXV1
vu6/CCNv79z0tm6GgIzI7OSLi2AgL1jNdL8Z9C+9aQ9UWgSJobMgMt0Msyup
xyTe00GnYG9z+XwzeBryXk7ro8NlnzWku9QMUxmfe8Q66fBiR4HuNdYWmDva
vvMckQ4qpssnasVbYJ9ngeL1YjpAR7axhUULnLG3eikTTgfHNO/eSZsWSJe9
csUviA4RLqfOBFxqgff7+oWGbtOhnXXBNOdGC5DrQlUbb9HBVOeExZ97LdDH
wccjZU8Hh/oZm9jGFrh66gCXlhYdwu43j4iTW0B+a+On80fokGedYlfV2QK6
fE3BdzXoMLWoffHTEP683z+ZZ/bT4dbBxEvyf1sg+O5lhrkEHULKNF3Jcq1A
7j9SA6x0yAnk/XleqRUULhVU8THTgWz0/eq0WiuEESe8fm5gwPEr1o0ftcKT
gaOrDUsYPJKj3XCwbYU//j4Xv81g8Cw7ymctvhV+elVFCg5hEGfmfsYjpRUO
5Utjqe8wCGCxUPiR0QrNA1ZvJQYwsHSRHO0raoVQ5qFHJj0YcCk36OW2tsKw
YmyZIBmDJVqOmGBnK8Qwcf0ea8Zg4nHMUuzbVpj9/ErhFREDEv1cqe9oK+x1
SbL1qsfAp2l+h+Eivn5XOcG2CgOnWx9nm9ZbwXZMveNaJQamUsQ2tS1kYHdp
+xdWjoFiVGyA6HYymMqdJHeXYEAz3vv9zz4yoBjRIXIeBkajdi9TL5IhPVMv
5WgaBofjdWO5ncmg5+m7uzcFA1m070qoGxncwo7buSZjwMhbFHLzJ8Nr6enN
qscYVF9/HKr1mAz9viMXC+IwyBW7bVuVRobo9AslPrF4/d7aq8tnk6HlQ6/t
6QcYuB1U+rm9lAyPsgbr+GIwkFhrM52gkCGBc/ve2QgMeP77b59NNxm4VAzP
0MMxWLVP3tI3QIZ7SYXBbLjftzrW1n4lQ1sfW/fRUAxafU49VvpBBl7Xjn6H
EAwq9qpcz5khw3KmalVsMAYPHqyLxy6TYURbYHTpLgb+x8eXGZtk6OCj8mni
dp7rHPRho4C7VPTf4EAMwDwt2n4HBZYrdTIlAzDA9qjNHVCiQMYT7EKVPwbL
vHnfDqtRAOST+FRxrzMLfNDSpEDl55OGr/wwYJ2mNxjqU0DFx1+zyxcDzq8u
FaZGFKiSOzN6ETfP4Mfcc2YUeBq2MLXog8Gu+jf3HS9QwHmpZ9cR3MLlikGu
ThSInK2U/+6NgXhuhseNqxR4RCCGJuCWTuVx9r5JgSvTE0L6uPc+CLK640MB
S1eJn+te+HkHzxmFBFCA9MVzsh63speDdlQoBcYCprmDcau59B+IjaZAnHmO
mQHuQ7Y6co/jKMBtWVe2E/fRM1VCaYkUmNO2E5r0xEBbV4YnK50CHOmk2Cbc
uoeSGbnZFLDOlmU8wW2gyPavKJ+Cf+m9cwvEbSTuN1legr/vNvF2R9xndkx9
qq6kANcRRx4T3Obs1r31ryng6cdyUAv3+dWO5uZGCsyzeR5Uw207d6S6rRV/
/2w5diXc9t9LXvR0UODCldw8RdxOQyIZg30UUB/3YlXG7dIVFz/8ngLVKwSp
Q7jdiBthX0coMDh8fUEX982qm74TYxQwxz55WOL2KqRdnZ6kgPbK3hQ33P5P
zS7Mz1LgDpnHOgr33fgW08UFChhZnKnKxx0arqa3vkwBXnJtZgfuSL+8QywM
fP3j4tv/4o5xE1DkZKOC6LwDmzhevzj7KDE+birkczj7muJOMF/cLsBPBZln
wjZRuNOPDi9JiFGBXyPOYRN3prLhjJwMFfooFj46+Hk+l67/SthHBebxybEY
3EVcmdTDGlTIcf5VIIvno2yT543WMSq8P1M6fxt35UJQmZ4OFYxavvgP4K4b
cUgyNaHCm23pko/wvDX29Uefs6DCf4RadQx3c6tOgJ0NFa4d93W7iOe1o0TG
0fUKFRIGbSSP43n+FDClHBJEBSdDt819dzD4etNaOiqCCttVZ1wrcH936twV
e58KtfGrRE28P6aNStdTU6hQUGItaoX3z6rwra7y/6jAyvp9vCUIz9tB5tRD
1Xg9Rko5fPB+vH46yZFYTwWtw7viFfF+HQ2sXe5tp8IYZ2lePt7PxFHG3t/f
qHAz8q5wDz4PFrHHCz4/qeBd+SjweSQGKryyxPU5KswaSLHcicLrpXXqHM86
FQ7GLTkeuodBeHZCBGF3G3iqHs3+hs+b+tfSpq9E2yCeueXCED6P/vVVCx+T
aYPb8jrsb/F55cwYfmmk2gYduaUb3fF4ni9JjV0zaoMtxp11/xIx4JauOl4U
3AbNk7rnsAwM9I/qc6pGtUF7R3CobBaeF/Ohd7WxbXA2XGifdTYGc+Grbu3p
baBx4vRw53MM+sd1n0xWtcHTfSsrHwowSC54R5edaoNst+DWWHxei+6jl+eY
tkNusAJdtwOvTwR/cv25drAKLfjT0Inv/8v+O+/s2uHJeLfJ4W4MbBJd9Niu
tgNJ+4yMRh8GqWsfP14NbQdC2NY64/cY8PfVM6m+bIfeF4WtU2MYsHuHmhN3
dICoRa9t5RoGfxq5F0c+dIDl9bXjNYfowLV6RP3D5w64vb5rOEuTDrKHr3q9
/dYBu1ZfD907Sgfbl5Q58u8OuCpSseCgTQdKQdBUGVsnqJebWUga0OFJ/J/h
YI1OGG02O0g7Rwe9S+8apFM64W2MpIiuHx3StmSEuVl2gfTL3dx89XSws/Le
5fGvG97oldiEn1+EftVR7ka/Xog+7VK28nsRHAXjuYKF34I6VpjmkLgEl61H
95626we7Z7svWakuw9zUmzsBIgMgsuxbmkdcBo7Nhv6JmQFIPERsO2m+Asvn
2W28ygdhh+izdasPK2C59eEWwo13QDYOeeRkuorPM80q8ePvIYn3KNObnlVg
IhISNTbew6+d4ebo2BqYNev53ev7AG1YpMq1sjW4w5Yfu/54CDzzTBNktq8D
Tz4iZ579CD2r1KfP3Ndhfyczw19qGOq3prsbda+D/AFud7/xYVATci6MFd+A
CokjXypqPsG1Yaqck/cG5LjmeQhEjkBh9vBdm5YNcF84p5Gp/xnubhe478S2
CdQt+zftd41CyKjHxW1Gm7BoZbysPzwKa/cJWx2jNiGRrUjgfNoXaL0+VseE
/180HlHQyHX5CpmCL6/wzm8CsXI+ml+BBrmSB8zLRBmQeP458iTQIOj7Oumq
GANc101X+5Vp8HLVpU9WnAHbT1XcSNCggcO2jZ4MCQZcpt2w3KZHA4MfoWZR
0gzg5JuR4rWnAfrP9bqBAgMsrv9o5EymQZNJHSX0IAMU+FP8rqbRYMpW5ugB
dQasv9ZX7XhKA8b3y6bfcBey5Ofdy6EB0cnYBh1iwPITpwfsFfj+dHmmVzQZ
kN1Bs2LtosFu93crttoM8Lr5iN+5lwYPmouvsQEDTgpAN7mfBm5//96uwD3v
kK0d8ZEGFnIkXxYdBugtXZBj+UED7bZnU3l6DBDK4qE5/qSB6aSV+Wl9Bszq
Nqa3zNBgI8jswgLu1HgRnrAFGpQFTpuAAQPc1LupY3Qa7HgSovEDN4wEhKAV
GmCZxxsfnGSAQKjikefrNOhxEfmucooBP+VGFhgMGlR83PXiPe7/AS77l44=

      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.6090035771640577`*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVlXk01N8fxrUJSUSLEkqLpBIVSZ5IlEgpIkSKlEpKlkgoWlBIJbImS6l8
KSKk7NuYMWMGNTOfW6KoCIkUv8/vj3vueZ3zvufe+36e834WO3tYukwWERGp
o9f/9/hz96/351WA3SKsH1HlQ8nn92V1QQUi94v2Vq3jI/2CVaCbeCV6m8+M
J+jyoRaY75u+vhI7d72XObuNj+fBMucox0r4ZI5sMjPjY32oxymF8Er80R+r
0rLio+ha0zGbgkpc4v7bu/AQH4hY5RxLKuG84mrfjGN8VN66bs+UrEJhgYyT
2Bk+dt7utpbUqcIM4wfMqX58MO5u37vjSBWMneeFy4XwsT/+4a4rN6sQljzt
plY4H+2Jk4zLi6pQ/WEwyjKWj0Opjlv/dlZBdmzqj7BEPj6ll+rqSFeDkfZo
8GMGH25ZCzd4ba5GmKnxqH4uHz+e+K3Nda2GwUDXeHwRH+ee81Z+i66Ga/rJ
xJ0VfIzkbViqWlqN7fZMy9FGPi4W3FY8+qUadq+uKTdy+Zhc/HN+imwNdoUu
HOFRfFwrtZD9oF8DqeGEiL4ePma+fTpz/okaLHDuOub4i4+Yyhli++/UgPGk
V5kzwcf82uOTo8prsFmxb/4zCQESG2r+NvTWwKr5y+7bcwRY0rzs9/R5tUi2
UzJ/ryxAZsvln9sMa2G43ThSX10AdS7pvXSqlq53yhrWFiCvHV2v42pxx8rs
o3CbANr8ROp3BX1eeqJEbI8AJdRYh1ZfLfpXhgou2Atg0Gnb6rGgDnz3K19l
jwtQ3V3Y/GR7HZ5lJJTP9BbArHdOffeZOhiw/hUvuiwA68e5SpUHdVh8dczy
dpQA1gOsMseaOigsP7NAMUmAD7/WFiUM1CFu95x4kRwBnEYj83mL6rH/gUPi
QJEAXX97n8rurMe94a+ta2oFcBcxzbLwqkdemb59PleA/ilZaeHJ9WDoDmoa
fBbAe7poYk19PXLevJg2e0iAMYmj96YM12PuDK3o6VOECJJ6F43FDXApTB5W
mi3EtNnKEf5mDdBouGT7crEQN+YEhhX6NOBB368Rs3VCSMt/CBpMa4CY3Mm4
zq1C3FHQ9V/LaICXzkftgD1CLFCOO+8+2gDK3oYn6yREisqwR+bSRpgHM7yf
eAixdMX+E58sGvGjKL+w8pIQj9Xyjir5N6LfRn+065YQa9dIO9pl0Py7Vlc8
RYgX607b3mM1YuDuvoBVuULobmjcx/7biKENglLzciHKdNR2z1Jtwi+O24QH
UwgjvWs7du1rwiv/Md4bSog6dBleDWzCeNFr3fk/hdi9zWhLRXYTlvwt3f1K
hALHOE17gtOE7QsVgzrFKNiaimhuFmHATTfwP2kZCgLzQ+o+qxgItxV81JOn
cHRvyfJ8awaGjC6mOS2m8GX/gsV9wQxEVZQ/ClpJ4bSN78JVTxlQN5yanbKO
wqAdd86xNgZqy01yyjdR8HVcL/1wSjNcEP6cMqAw7hwjIVzTjElljDwRUwoh
rv1TFx5sxpkOxgVxSwpiJ3ZPWIc2Q3x9958RWwqRp3JGY3KbkRY5ceHLYQqz
PSWGGO+bodc9b4x3nIKZ7nqf0ClMtG7V8K/xpCCld8RLRZ6J0/E7xgr8KLC2
xHi+XcPEDa3glrvBFGLx9rSjERNZAb1b1l+nYG3Q7/7PlonqKqtsVhQF+W1K
xxM8mOiUKpfziKPwwWi366ZQJibbqAVJplBIMr54hBfPhHJqbG92JoXDO3Kc
zucyod8zbm3ynIKK6XsH2WomBiXUeVcLKHTtkrD77z0Tk7YaarwopZBlvsnG
4icTUudtrlOVFNwt3Ky+i7Kg8Pj0R8lGCmv23rMMV2BhpfDK5k1sCv2W1RYr
NVnYKJcQ69JBIX//L7MaExaM53YuO0QoeFsvNXVxYGHi69qmv90UdGz2mUw5
x8KrUn+vhB8UxmxDjFKvseAZXbNQ9xeFMrv/DJDEgpqLbEXbGIUgB0qfn89C
p47jCZ/JBNscZ+n517GQKPlEZq44gehh/U3yQhbauD9nH5hFUOt8amPhEAux
Z6VGQ+YQ3Dj6QMtKogU/TX1fZiwkMHdt0BhUaoHiZsvs64sJpN3+rI7e0AKz
VeqJJ1cQtBxfuWrtrhZU4vaP9asJ7rrbqDY5taB3iqCCrUlgc+rqMnfvFvS8
XnHYTYdggUfBEvGIFkQOXHNhbSHgn/mslJnagmrtCJNZ2whSzsot2l7YgjXa
GVGGOwicvbYt+NRIs35Ch5E5wTLvs/OCP7Zgd1eV5kZLgi8+qXJKIy0YDny7
acya4LEfU6Z0JhtSXmJayXYEp/wnpOxU2Dj/7bGKgROBxsU1kqM6bJh7UMFh
RwkGAh3E7+1mY/nAHKrBjeBlUITohqNsTHjt0pc5ReAT8noK24+NRdu15T+d
IdC90iPieYsN7mIv3edeBH9D5celHrFxazzXzt+X4M3VHWM5xWzseP89wCSA
IOS6z4gpkw3rDdetoi4RGIVn/PrymY3IY+cdeCEE0yNbB8LG2Ki6f9hFMYyg
/ubU/qUyHHx+6ZS9/jpBRJTW93fLObjwpOv3aDiBRYxzj5MeB7NSTxq/uUkw
Oza6e3wvB+l3B2KvRBNw7pR3PjjGgfSyLuPvt2k97vUR3Ysc2B0xXKJ5l8D2
vqKwLYaDjNSkf95xBAoJ5h+8szjwOuBYdy+eQPAgoF2ujIMR0ekqDg8IUpOe
cPPYHAQUPAtYkkRwNKWDvecrByKu1tzuZILlaeKsH+McDCkn+hilEnx9qMOI
kGsFL7R77uU0gpxHxxrU1FpR3LOu4O1DgtOZd2tr0Qq/ON9Xf9IJ1mVXVbla
tYLz6FVA8iOCwcdD76a6t0Ijf2SrUQZBQY5KeVpQKyLKdaZ9pdn3mWXp1rut
+NrkWxeZSbA5N7hY8KQVC4Ly+jk0j/+XWxjwthWrLnsrNtFcni98sYDXis1h
umZVNF9+KZX36lsrzK6P+5XSbFy45bn1ZC4cIt5lvqRZrOhkztA8LnaaTvqr
QnNDcUJ2zGouNHU2/fSh779ZUp+hsY1L551nVwP93j1low8ZNlyIymW/V6JZ
tlw19eRpLrJmuXv20f9tfXsgSeIKF1+YIY+y6X7EVYQlZN3nYnlMfPsRul8H
q17GGT/nwmVf3kzFFIJFNZ13Oiu5iK8rlral+03Vyt4O6eBiqU6Awnlaj7R6
wyjlfi6dz1tUo2m9XBo9I8um8aAzZ0LrKa2nKiPlhv1CHjYlBJU50Hr3NDdf
/aPBw6snzeWE9sNT1viVOGO6vkSxwoX2yxn26pCN9jxEPe2PFNB+0my1v8Tx
5KE85mY1m/bbL254wNmrPPz0UZ+ovUZQ2FbsJ53IwxKHeu2yUIILHV+9n+Xx
0Ksar7eP9rPeh/leZrU8vK4v2RsfSDDBN/Hs4fNw46TQlVwgeCf0Pn1tkIeD
UpMDVH0IrpBH7svF26CWuzTa4xyBySeOW6ViGz4qzzus70Eg8XmKq/P6NlQE
ujTeOEHQ2KV5RMS0Dekf8rV5LgS3vhx2SnJsQ6ju5Icqhwkse6Ic9M63wTVu
j9QZewK5b28Odtxog8lwkl/JAQLe9x8HfFPaoLr/e6fYPoL7fYus5ha0QX+0
akMnPV/sf5pZvmhog5v6iXvi9PxRHPS3sCRtiHGUGl1jSECGHpv1D7ehJCbv
4H49gvTh9p03JdvRXWVd4reRwHVEzER9STtkRv8sStYgWPlH26heux166smX
KtUIvo25GriZt2PGl6GxgKUEz/7d0Rc90g6p+yn1MYsIPCcqN6f70udNze5n
zSXQmjSkY3izHXJjv4+V0fN6eLLKRuphO+bmPNzIESMommqpFVjUDnkHi2k9
kwj8RYM1FJrbEXHp8cdTfyjoi+WuLu5sR4ZkdPTNAQoiEkI1mz/teHffZ+vz
HgoVM6RUh2d14MPyQ33NHymEzdyyLHZZB37nGyX10/m0Y9bJJZqbOzDbYJW5
DJ1fM2QSlJh7OtCvsMZvez0Fxux6hdOuHcijlCVPvaUQJTcqLxnQAa902eTY
VxT2zVWd9zi6AxvdRDVL6DydM/+A3I7MDoysGq38lEGhTT5MpqukA8V9vQdm
JFH4HxxMcTY=
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwV13k4lN0bB3CRXqWFKLJToUVRlsjPt0IpW3qFkq1IRKESKipFm5JEtiwt
LyraERkpmiTbzDwzZIxHsqRsZSvL7/TXXJ9rnjlzrvs6576/j+rewzu8hIWE
hGZOExL6+2msI+yVlFTEiK1IbisaLgDv4kWpSzFFDM2iEbuemYU41iZRHnam
iOHuXAoFxULk3VBW3uNTxGCKRN88aVoI5WHjRiXDIgZPfUzNILYQwsXHre/y
Chmyu7qv3FhWBKbZD718mUJGV6oGr9P5FeydeDMqbr5kxJ5eKN1fWgJdL4Vb
0+2eMRS2tkd1DpTh6X54Fpg+ZhiXpm6x/PctxEXbbE5czmUcFbEYVLhTgU1i
qs/z59xlXHEVzl2txIRP93qlmxMpDNk8R4dP3lX4/LRpsV5hDKM6usVkblM1
ylbeUGwJd2PUTernPTWoRfGm8IovCufAmyV35OuTOhxoSe8+I5uI3effmRo2
1SPc8+zZvVmZmKHhdPJBdwPk78mo8ZP+w8KuCs1bvSxoytW3rZbKQ9jWZd4X
RTgY39GxsGbuUwRL1so0THGguHbYqt/+BdSmalv0Z3HRGTIizrhciN/HWgQr
xXiQqloUK3e5GDU2L//t/MHDcb2aJXs/lmL63n+sv7Y0Qpmyg/y3MiT45y96
X9CE9Nvnj/65Wo7cxjipuKTP+LVoTa/OyncwivNrC/Nvxm+5w1V5jyrArjFq
ElvOh8KyobxM2/e4f5JpNec7H30l4sNNHCbOud2on0xoQaJIyhlf+ypsdmwO
S9MVwNnxyIKAnx8RFZjuNskSoE67Wbwk+BMsHLVOPVnVCg+Zq7PC5WpxNtx/
qCCoFfucmtUtnetw+9e1utd5rejtLAoNk6+HaMziFcdaW/HPZHFde089xCdr
XbfMo+GrwZ/R11uP2KMnWzuJa7ZPGo8N1KMn3WckWoJGwp0NOXNG6/HPtY/t
lZI01LdWnNGf3gAMSJVAmoZZfM2aCwoNuMFut1VcROP0cjp+hXUDOuze34tW
ozHqMGNXUF4DRtsu1y/QpVEe+Hi9/5MGXLi5OfYW8eUru5UOPG+AihndLqdH
Q6k874vLqwYo3wy3VdIn62s5Htpa2QBXdp2myjoa10SyI1VaGnDN55pgnjHZ
z+OteTVzWKibt/TPbVMa/VU/Yz9IsDDxK2+3tBmNoq9pR95JsaC3xtHmIrGV
/OC6V4tYKNlcNRBoTiMoKvntvaUs0PfzNUy20Hi9p4d38n8sxHTImZZvo2E/
M0ZkhT8LJh77OCF2NNa93NKwP4AFmyh9/25i+X3CmVlHyLm7/D1y1w4abSXH
TeTCWFh3tVBr3b80AgP2hs6MZuH+Q1ZAnz2Nq1yDvs4MFh4Pr7hn7kTjw722
prtsFubYsTbHutJ4uCMtp5XLwuVDxYn9xLFTjiEKn1no+2nitd2NhtOuTwvi
aRaMRmqOzXWn0TG7cHskOfcNtOTBcx40ph+NqfQQY8PTWybB0ZOGyaZ1T5WM
2YhVi/RP9qGhJVE4ZzHY2N3Y2NROrNBi4KOxiY1q8zrWKl8av0MNVLQt2NAx
dz/whvjlE/2rG+3ZYNYfkKMP0lilqufr6ceG+pvR+FmHaCj2Pa84cJgN0Zsb
X1gTz36tq+ofRNarMnSPJf7mpMs7FsLGYo3xndKHadyPXbs5+hxZf0KNsTCA
hrLQGrXcVDZi+phhokE05tY8OZWXzsZ75ojJRuLJFJ3Gp1lsDFW0XzlJ3Gyg
E1uczcaDkpKKAeJbh7Unq5+zAefXOdQRGhKCVU191Wx0Ob3TunSMhlDpiji9
CTaqptUXJ4bQmKlU0hgmxMGN4hO7mcTzw61Uy0ifyD45cHCUeKmJ/+NtszhQ
O93f4RBKY1tpXo2bDAeeuorr54TRiC/VEb+kw8Es7zWWbidopCmV76jV5WAw
+sicaOL74TuSpddx0P/BYmMecZHJkWXpJhxofPSY+E3cUvp8y3NLDiy0V1bE
nKShyTA41+LFQWSF5Nlbp2joKDM/LvbhwMQl0L6A2CjCScrHj4Pi7pWJHGJr
hGb9DOLAJcfHXyKcnF/GqzKx0xy4DXF2RxCfULYUs4nkIPnQwKMk4nMRn21v
RHEwZFkd8Iw4EeMtijEcuDYEmn8lLmH8b2JNMgfSao6amyJoVCjXmIWkcWDQ
aDHiSFwT4XrldQYH0+a76PkT04iQt/iPg77w25M3ib+lz9sXk8uB6sG7F3OI
f02l5zY84kB0a3hkCfGMsjJDl+ccdK53e9tKPE/F7kxWAQePJk1mDhLLnqaZ
na84YMy9+1r4NI0VG4Sdgt5wYOyZH6hGvL3MNDi6hgO/4jvTnYk9NyZtu1nP
QcZL3+79xKHlvUp32Bys2lVnE0Sc9S7pfWkTB9buBinRxAXmfSnVfA7CsmXP
XieurjQLaGrlYLmbU3cy8RCzT3a4g4No9tN1D4lnbTP/IfKNg7FDj1SeEyt9
TH4j+YN8v7ryQjHxWqv+m8r9HGRO+xFQTmzxydxX6ycHb2slG5nEe2xSTNYP
c+AbueRNDXFgbf/8rWMcqIguWMYmjtq+udNhnIMjxiyJRuLk+pRiTzKXRubZ
hvCJ83YMXAsSpmDmFeJGE79lbfY8LUphTAWV7cQ8+9R1V8UovFK/8bCT+Dtn
YHaqOAXDXZ7zvxFPc9xC58yloJicNdJDvJCX+qJAkoJm1f/2/CBevmvwYoU0
BYkPSzf0EqNpiytLhkLysW13/treOW0NLUfh0qOU8399oHlwRp8ihQLrmZ1/
f3/KxeLzuAqFXp3I99+J41rS8mctoTBbb0z97//dd/sZKatB4bu2s2g3cXGr
hZP6cgqnJm/t7SCu87i9UleLQtqxLJMvxO1tP4U2aVPY6u+dJCAe3beVY7uW
gncxN+gz8Zyvt3Nc9CmI6H2poojV9v86ddCQ7D8vNLOeWL9z645QYwq3xy4N
fyS2PJCuHg0KT7pnVFUQu3f/+h2/iYKHLV+eQXyxJ/3OYwuyv1dORo+Jb/sN
HS+1pDDlwp+RTfz0xzarahsK6k9O2KUTN/cN/eq0p+CV+M79CnF/gOWHIUcK
jQybpWeJRQcz0kScKei9feJ9nHjVL8vNyh4Uzoe98XInNj2WKaflSWFuibWq
PbHT8HCvkTeFWz8Dd28hPjOamejgT6HHfqP5SuKE0JGDngEUjk+vHlYkzv1t
tSHoCAW/F4+WziNmj490xYRSWK+g96eP3J+uU9avU05SGLR9lSkgnpjMup4T
QaH+9M6KGmL1aTZGFecp/Kq6EvmAOFT07uXx6xRc3A2aXP/e1+NnZ/+Jp7Di
87nabcSHvrnHjCWS56NOb9Yn3lureG04jYKpqHmROLFVUmJcfw4F5lH7x49J
/6gUD5bqe0ghd6fXk1vEG8Lt43/kk/N0PGftaWK9fZIJ315Q2DYUU2xNrKR1
Oan9DalPuyy3jfSzW+k+cl/eUTjaKt1aSTx/vkUK/Z7Crp9Mn1zif0amp7V8
opBUID91mLi/LDyD10jq/7t49RDpn+X2Qf9VD1C4Grw/pZP0V+P32zU//qKQ
cSY7+y3xS8PVOR9GKFRmPNBLJ36g9D23coJCuVFBjT1xfJdXXtlMLpyj1vwp
Iv3d++SuF89VuXCpWKHtR/p/W6+B/rMlXOjxjddsIN7jsbDgiQYXcxRlnkkR
b9/MKszT4qJirEu7iMwPIwnrkmxDLvwNbOUnj5N5eHfD21Q7Lj6YX047HEwj
I3u1drM9l+RRuwUGxHqPlNLknbgYau/6OUHmlevL8eBkVy4uLsDXi8SPmYXL
bx3kou2IU0LyUXI/f2jH3TjPxZ0X9SrpZP51DShPNVzgwrZ47/ge4lPDc/3m
X+GiZSLqf3LE96e+m1+P48Jpt2F/XCC5X5I5Y1fTuZCSWLjgFJm/qfqqHpeK
uFhrrG2pS+a19nqJmg8lXFAWCcFd/mQeYMpoZhkX58/azkgl7rXgS1+o5OKe
1cEd04g3OCcxz7O4eJ25MOUdyQftEZLaZ35wUWb3oFnrb974MG3quCoPZdOF
4y/tI/2398VoxBIe6vVtzusQ+0n7DkZr8GDgUfedu5fkH7eGr4laPIh901Va
TLxyOKu6wJAHkaynYs9I3lm52Cx5xI6HSm2F3kIX0s9ORekdP8vDg5l20Xsc
aVRlGa2OOM/DRbNg5UEHkm+ZvZrRF3hQGX6zIpo4V8pRIfEqD3pXLmXk76Sx
LFdDpCCZh+xfEmNjJK9pcpl1w095iBY/4nh0Ow0NHXG/4C88rOI775yyIOeh
q9aO0cGDUkpqTwhxaka8gdg3HhiN2p8HSH6UkFASSe7nIWpisoLeTOrdq538
eoKH0DjB+yKSPz88dGBOl23EGzV5320baBzUzFpyw6oRgXfDb/wgeTdf2ZCf
/6IRosz0T/okP9cwow53FzbCv0PI8qIqqX8ge9rikkY8MIhX+6xC+s27w+oJ
5Y2wbJkSnFQm8+PA/cMnaxuxpSP/eqECqecTKeGt3Y34PS++VEKGRrZpr3qb
QhNGhXXzTcVpZHrfCZA+14Rtbzv88wdaUa3z8trC6CaICt44dPS3YvQPM0/2
UhNkrFpyFYhtYnu/K8Q2we5zYnx0byt+Fxr6LE1twj6Bvp9DTyvsZ9V56D9v
gmyrjyKvvRUzHo3vcGpvwg7rVMmD3Fb4De7USzX7jOsXPsV8fNWKChGtSdcF
zegtP6MdcrQVw45Wo2a8ZnxxX3PXVbMVcaLZ0g6JfHwvEvR4/idAiaGmXtb+
FkQdbTA4wWtB6eP+KElNAR5WeFuIT2tBnEPGhsAVAszY+MlFZoIP73Hb33Wr
BLjEZhWqjvEhYZHvH6snwKGAIROdAT7Zt7/9PFMB/ITazq+n+RCb26M6x1UA
ttn8+vEyPv49+LVELF4A3SUFA9oRfGhK3gw+kCgAz5zjIHqCj/GXZtrMZAHE
eDJ/uMF83Be+eyc6k6zfbigUcoiP0aS9l2bkC5A702Qky4WP20yB4/QqATpC
0n3vrucj6NA1Sc9PAtx/dj1njwEfW6Tx8W2dAAkWXkuk1vLR73bbJJIrgJqV
oDqMvD+ajuxZKvxVAKUEry+6i/iQTZst8OgSICM+50+LNKnTppJbb3oEGNde
aRMtwUfCVfnZZwYF8M2Wz2z4hw9f3Y8VrUMCmOUpZx4T4ZP5HxaxYUwA9/9i
mxZONUP69HLDjHEB1FWNrF/+bkbX0qbBqSny3nmvc/Tf4Wb8H+s7jmo=
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577216077*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVVXk01I8XFZUlFSFZihJJRYukqBsJldAmQmRLlD0qpYVSQlmSLT9JKalE
yBrZxzpmNcbO2M18SkpKP98/3nnnnvfOfefcc+59ax08jzvz8/Hx1c/Xfz3R
N+EBL6cSDDtL6+AZNhQCfgZv7qrE9INrH1aNsJF+7VSQq3AV0rfQLi8ZYkMt
KPdKumYVzMkaunMDbHy4Le7bY1eFqTK794dG2dC863lJ/mEVspbKiWQLdqLw
ftN5y/wquNjQnVcqdwLhmxxie6uwIcN98Lx5J6oePbBpFa2GQ67j8e6IThyK
GbIQ1a5G0hfrLxYNnWiOO3jM2LEakRIdFdLyXTiZ+OJISGQ11vyx4Spe70L7
swWG5YXVeDvQJa/G7sLZ53b7/wxUo3ghofQ/4270p5fu0RargUnAlJFKYzdc
X8vt9NOpAXdqNo++oQeTb69qZLvUYPf7v0aJF3rg+4GxcTyqBnLJRst9C3vw
K2fnetXSGphaxDoECvfiRn7MGqfhGuzJsDHbaNsL/iJiVapELQ7IqcVU5ffi
fqmZBHtfLXJlLKeUxfuwtOLd0lVutTBvPnvQyrsP0VVLhE4+qUWviGLKF3If
VtVd4H9cXotEU4v8I1r9eNZQ+6dhrBZrbqW+kE3qx7oW5Z+C0nUYXzLRosk/
gIy2YOKAfh0eNBwzjb0wgM303rGbl+rwksNJaCAPIKcdnOL4OoD3W+Pv7kHs
6nzW87OyDjIBHPsNaYMo6Zll7eDW4Zo992OmMAd6A1Y0T9l6BP+97kzz4qBm
qKDl7cF6sJS8hnzoHJiMSZGGvOqhX6x37LXOEMiTvlVKyfUwOuaxNj5lCBbf
yGV2tfXgt20Mm+QbBvuHRmHSt3oUqPysq7cfhv1MRC5jNQkbZy8nrysfBufP
2DuJQyTc9TjQ91d+BO58h1+b+ZGwfdnUIbWAEfAEXqc9/B8JFdOr9f+2jsBf
cPGzWhIJzHtKVutURzEr4vRUYJoE9weVMQU3RnFr2dcorG2A0L/IzBryKBat
UAwPNGkAm2/EUEthDGFSQfcKAhpQzlUPD704BjEZ9q3vaQ1I7/IjMwvH8ER+
T6BGcwPuNRWtVBMch6xi/GX3mQa4lfDZBJ4cR6rStGfG+kaYvTV83vh8HOs3
nHTrN2uE2LkzFrKD48hUy3FSCGxEuPgUf/6GCWioi9lZv2rE4q8RH465TeDT
Ng+rp+RG3PbZYDORNYE9OxtPUP40Ym5dhdAD7gTKtNVMl6s2IYByJm/99kkY
6N43PnJiHq/Ivki4T6IeHP3QoCaE7Bv8Ip0+CdMDBnsr3zQh1k1WYh97ElTD
tF3/qE1IizNzcZLkwuow33YdvmZkfw0pDDPhouvo2c0Bm5pRNlko+jGEC6dj
JSq5Fs2ItdEprMnjYvik7Fru7WYMK+XtL+nnwsPyitymd81IuSw9wBTi4bs1
Xeo8sxnGVtQMigIPV+w0xV4ItIDQjXJv1uJhziFapFu9BcmKphr1R3m448Jb
KHemBeKpc4ZODjwIuZn+s7jbAs6Ml7SbHw8Rl7JmorNbUHiif8jzHg8rvEWm
mjtaEPHu1OfL8TyY7NEMuCvQinOCdfcDM3lYpuvopyTTCs1ze6xul/BA3hvt
XaHeiigPP05SEw+xqPCwM2iFSNDFmFYWDxZ6PPe/Vq0IjnDav2iYB5kDCheS
PFvxJ9lmYvcPHtgGpi6777bictbJRA9+AimGNxwZia2YLDYxerGcwDnjLPvL
2a1wbTCYYsgTUDrcYStRM79PWuivqUKAc0TE+mNHKz6z9UKK1Qm8Prrb0oxo
xe/JoGj9XQTczVxPTSwmY++CktR6EFA/9vT4Q3kybknMvDc3JsA7XmO2cTsZ
lcpapQxzArknf5jUGpEREZNFzjtNwN9i/WFnWzKeHI35/tGagLblCSMBXzJS
BK9JvbcjMGt1x+D5fTJeVdjvynQkUGb9UQ8pZLwPNLJ6dZ7ALduefZ25ZBTs
VA9McydwwG65bmA9GV+4ks9SPAksPrdvt0w3Gc3lzZRl3gTqHC5pFUyRkRl8
ZPX4PA5zSt5xSqQNX/UEzsb5EDjq0rD1u0Ib1Ez3xr+dn4u5/t4StbMNsWcC
2sq9CLRd2LhJ40gbdn1Uv7p7nj/O3VK1yb4NL1OeoewiActLocru/m2oCOck
C7sRkPXMXycc3obA8Kcz9i4EOr0GFTKet0G1ycXy8zkCqT6Sqw8WtMFQLNCw
xYaAg98B2f7GNiiEjOm+tiCg7O8jfbuvDS43pnQl5vUbDnguqfCrDSpOV6P+
0zfzaqt46VIKIiNDOVnz+l8K/LfMWomCiTU/ts5qEdh6Q110RpuChlWOlqRN
BL4F2Qo/NaXgzQryzQRFAnm3whfvdKIgVBQZrlIEAu4UC1CuUub/Qo/bRkEC
e0JG+bwfUTAsr3a+8hcPf+7KzC17SYFtmK+j7SgPX0KNZ7OKKGj7WWL3s2Pe
Dw8Cfh1upSD5GaFtQOLB4OGrH8ODFMi5lDvc/cyDYATt271ZChLUH4XXvOKB
FLmQt16civ19K6YHYngIf7xj4qsKFTMpiu8Ub/JgFu0waq9LRba1upON27x/
YqOG5o5R4bpKVy7+FA/UJ+UDyeepGH/7xYO1j4e4p9zePTeoULFv1LDawINV
wppuZjQVZyXbeYzlPMgnHWX7v6ZiYRPtgDF3Pi+Sr7dLllGhn2skeLqYi+cp
b+k5FCpuJhSSnEPn8yOVRTEfoaLk5qZIvxNcqKQJkyfnqEjS8Ihrl+Ni5IV2
c7gkDQLvT45s659E1svzDWpqNLht1tENy5yER0ZcXR1ouHlz6Zo870lse1Nd
7XKKhk89qZMampP4njn1daE7DeN6ml8ypyeQn6VUnnaLhnUvah8pF07gyvvj
pfvjaDiz0No+NXACOtm3i7re0rDooI+ip84E5j5mF1yvoCGNW1X359c4ynO7
P8kyaNBPlPYOyx9HcN6ynM/jNHQbuMms8huHYcHeDxb8dFznllS83DYOocKL
WVPSdGQqSH1IGRtDQ1HSm+gtdKiqpOkOp48hsoT0ausBOl5t1iBtOzsG87KZ
F82WdGzcUXI6UHoMEuWqzy960CEbI6H3tGkUtIrTKSIhdHziEyvTCB5FfOW9
pNcJdBzyENWp0x7Fmeq8eMMPdPR3CH22nxzB6tqBJwNVdAgdXFok93wEPXUS
MXdYdGhlRG1cf2IEaST9x4o8OlyFVyZsXjQC50bviLJFDDxxTxTaWTAM1ebU
MBs5BlI6LkURLsMYbWkJ/b2VAdqb9TFFUsN4R54LiTdkQPhKR2xw1RC8KFvu
aNkwICVfmiTuO4TtNJubVG8G2O6aLWNrhvCD/vC6T+g8X/Fb/hoSBwXMoqti
zxhwXqKklerPwTXWiP/7HAYGpieEYxQ50GWv8jOpY8Bj54TgbN0g/nUaeY92
MjDlO77I0XsQX7v9Pe5/Z+BqzphAg8wgQnpfuqsIM8FPjC7Y8XUARv1U16o1
THB/yDucch2AyKCAi4MmE2aWV7YuEB1AI2e7I99hJnKLKHNZH/rxaPicfYod
E5KrNZosT/Tj+OhjW93LTPjdDEta+LMPkuNfzrDCmGD2Dl7ITuwDY2Ly9JVU
JrQN9LRt9vUhgbv61Mp8Jl5eo1Yu6OmFDWFy/FMDEwn/lmY4B/VizfdAs+O9
TESHGIXVy/eidyrThDfNxF3h25e2FPcgfbr9UKRoO65GFplHWfXA5ZeQ0eZ1
7ehXGT4/yu3Gxt+7DEi72kHaaq2es7kb47Mueq5H2+ETojNW49yF93+f7Fvs
2I7PHyv7TiZ0wvtflU76lXZMdx1h9TWysWPBlLZ+ZDt0RalkLz42pvmVtHpe
zN/bbVM/t6MDhQuP7wgqbEe+y0B5+HkWAhff3irf0g5zZ3c727h27BPK3lI0
0A5XSFz4UcEEn0i3muXvdoTJFPtETDBQuWSZ6vRyFtK/O1xXlmHg3tK9yrHK
LJQ2idwrNaDDePnFddt1WOjJyHl0youGJeJJCq3mLKStrdZ/GEtF8wqSvIcL
CxaLdQ7afKbgseSMjOh1FiTHso22sNtwYqWqdGYUC/UtKofn/pEhteq0pHEG
C6Gfkk1alMhgytwT55SwoJOwwizVqBX/B9SUZGs=
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwdl3k8ld3XxhGlSBJRCpHIUPKYKk/XLUMZypgpQyFEpGgypZIKSRpIpQzF
k0JSZDpmMp9jTIdjpohzlCFD3vv3/nU+389aZ++11l7ruvfe5nTW7BQHGxvb
Ajsb2/9+S/QnHNiePaXoMNZtoZmfIn74fdW/8/ApJTfbq/2K8SnCg+3ShSD5
pxTZTBtWswDJwtn1p2ziKYKD5WbOT10ID13ZALWPcRRdrUXl8Q/OhGeiYGfH
mUcUyprwO2rsToSC28BPU41HFD3J7cP/jpwkxhWyV9SveEQJPxCv495wkjiT
Z7y7JP4h5ZZSkbl0PMlN4WFpNQ8ozzN9GPtVSV5iU72yPYZif/FwaM65E8S3
7C4p1by7FHseq4PHuRyI1+ttizeY3qVoVtWXmXTZEz4+X62nvkdSft6/+/Fq
pj2xclfn3UzRSEpDk1PTbVt7Qvm/ttmdV8Mp+vUd0/hgR4S/aK4T07tFCdTs
VOc8e5zYF1nly90aQgn9dPnAKj4bgmtMl2/kTAhlcNYpKeW7NdGsX5lWyRVC
yWb2cPlWWhP1fLcLuM4GU6q/mtMSg6wJKa4b9+ZVAyiz38xLCaYVQWNdVh8s
96NMDHNNHu2xJEoUHmztCXakSBUZaGygWxCfhL0U9ILsKKWf7U6coVgQ6RyH
9mcE2FC2qQn1fk+yIB53zlsHXzanuGxd1DD1sCBy1oeb+tf8S2EKrX9eP29O
DEs1/n4Zb4II/afKppLmhFR3HTu3og84twoG+YabEq5OQn+9fvqAGfFn26rz
pkTaiMN8y7tzeDGQuDbfxpTYNcWaerHLF9YevFJBO00JjVUig+pKF6HhcF7F
r9aEMNrjUuX2TyAmxG9McAmYEAUHgysHtoSCei3naIjXESLl8EddlZuhaOa7
lOFNHCEij45Xhv4MxV6Ox7rPNhwh7Gxtq6SLb2KCVtf4Id+I+HtOrdrN8Rbe
Tfw+VsdjRBCJEzVjieH4mTRXf+yzATFwdffwlQfRcFn6afcZh4lODsMdSdXR
kKx5nzW96TBRf9PVtXYhGsvya1+6/T5E5EQ8H97sch+dpyhqY/8dIkJjeUYK
VGLwWmL66WnhQ8SOzJGRpbYH8PJj375qUZdw73nx/ZpILOpeRERMf9cmBM6v
nVHWj4XDx8/2/vXaRCFXAMfglVjI3I6u3JGpTaxXtBTV+xYL1fni+9N+2kR+
AO+RNQlxoO33/3KKQ5tYu+lKVoxUPCQdCuiu2w8S2eZml5J3PYfm8VNyaTcI
wm6EcsPC8Tni6G0ZFR4EsSpAMZor+jl+j6ivW2FG2pO4/3NjPYeDRkD+oARB
cLGKu+RzEvDU+Ki+dwgIhWoh8a4tLxG8YOQ9uvoAEexy/bpTUiJoM7kO5wz3
EyGf2byI/EQUG0xIWEnuJ27wXbUSoyXCKYcW5PdnH3E7L0Chiz0J+/Wpvy3S
9hExvBfaTU8mYYuMw6lX3PuIVzlucloSyaDJ7C7Tb9Eg6jmP0MQTUrDxYF/J
tyg1otGmrnDpYwr0dZ8FqJ5RI6gZ+qnfGlLwLc2yoVhfjWi31guMXUrByzsP
DjtyqRG9b7Fjnf0rBEmMKVGDVYnfFsr+f0Vfg6NIi9DzVyFEXwlLdj9JRVpJ
TOXEfWWCGb7Zq+xDKigb+s8eO69MVPhszUttSMV2PufZMTNl4oym1NHz7GmQ
HWiPSxVUJgpbdvmvOp2G6L/fNpjF7yEcOPRoezT+w+jKjZ6aGUpEkqPf9bD2
NygzsOW5+FORuKh7qcGT+QbumzrT9D8rEgby/iKma9JRci6K4XVTkfg1czVD
9EA6VD0O2r0WUyR0oiK6sl6loxyeEXUWCsRQYZLyN7+3aHiqaXG7SY6Q3Uzt
370hA/VNY2q/F2QIK+6lBzbyGZhw0Sr80SJDhM3I6t7QzoCOyxVseStDDNFC
Utt9M1A9d4t3t70MkRShdCaoNQMGh1V8eMp2EFuW7k3XPspEzq1+DofH0gS3
jwznP5FZUPHXKjnnJkVIuBXRD8VlQbLv1tRePSlC3cH8o11KFjLO2qmoSEsR
rkZXXcMKsxBWIM4oGpAkKmU7ar6OZwGTKe/EnCWJ631hd0OOvIffDJtwj8c2
YtFseGMjXzYK+e309PaKE4ExxS+GRbNh9fS0aNOSGLFEfSy7LJsNv3XHbhWU
iRF/TQ7tU9LOhjpxbrDwiBjBZpxmH3MpG8nJupJm7lsJTkOPFMvebKxs77tj
lClK8GpP7GG8/4ADX085toWIEJHXq/Jniz8g5xovX42JCLG2LEGbv/4DxiiH
P67dJkLwaRkf0xr+gC9+61dFlwkT/Mi6nLw5B/pXz0c5rxYmBPefp7jdyIHF
u6WJnldCxNZ/ZoyYFh8h5+g7ziu8gVDRmLpVd/IjJFuX7yuzBAijfyfKXnt/
BLtaTWp8nQDhf2hYw/72R1gqOL9QuiZAtB9v315b8BFTuVb7Tk+uJ6JDPy0m
S37CDYE1z/I7+AmO9otvrZifIHXuP6eqN2uJTd/OjygvfUJRYXTqIe+1hFKv
tyTfmlwMC/xrra68lnD44RpXIZWLx04hno4FvETBX8vQPVa5EGzhii6h8RB+
Mup2PMW5uLhvrcF+oTXEyOVZHkpEHj7ZJVv1Da4kFDi4/Qtj8/Cu6PJ5jbyV
hE+EyOjnZNLezCnGiFhJzD/fW5FTkIe+0Pcum1RWErzlAYFvxvKQevRWkOpt
LkJ5LdvPR4afYVPstf7tAU4iKJG78QxPPtr0H2ln9bETZXKbND2E8xEe3OG8
s5idWJmz842bVD5eOVNXDMWzE9FVBmFO+/ORoJl1UPIYO5E0FnnA2jMfp3yV
jr2pZyNqVNdnatflQyTS6uCBe8vYULspenNEAboVfw8Yti2g5OmZDNG4AoTm
PI2ujluAtxelfsurAvR4JHtX2i2glv/UanFKAfQC0wN1hucRYpV1XepXAdJ3
JpnsXf6D8UG9CwrHC1F13G3FkcNziP/05IGieyHy+Y9YRm6Yw6Hb4+93XSjE
w+kfZlqMWSTJx0wo3SvEEx2jI6svz8L6fLebankhfl7Reb6YMYPKZV/bA/JF
uFm2ldK4ZxrnqVWXoVGEhXMi+us5pyGRvCmW0C1CpvyXFcXtvxGoR2k56FgE
Dq2/xuZBv6F8d82RQw+KENpwwta26RcSNifCZKEIYlJXufXCpnBJtXG7U10x
CucO35Tcz4RZhOrFmx3FuJPy/cprUSZ29T2rThsoRuZ6nokfc5MYjPT0mFwo
xq4H4fZDQZMwGeTOClSgQG/Na9f8qAnIPtDeH3uXgsYe9w2ideNY8f1NZP4T
CjQyArmFH42j54BAT/crCq57iRbGO47j4Y/ekO3FFMT6jv5SnRkD+8HgqvcT
FIgYe88l7xyD12W67LBMCcwaE1+kpH2HrVQ0dVaxBA0aawzy/L/jcKO2/2qV
EuwWsrijd+Q7tm9Pr1MgSiDy+UFS069RdDVd8fa1LkFYrvjVYL1R6MkI57Dd
KYFzyX39FPYRqNBq7QTulSA4g0uN69swtgUFc21/VIJJGY2XrTnDWKQNWR5K
LMEqqzs8haeHkR2c8+fu5xJoxvHpPukcgni7KUR/lGANTSyN+WUQWq92lGQw
S/BDx7p1f+ognP0WiIOzJbAcnU5aCB1EqsCrg6c5SyG7WaW2TWsQu43ndHPF
SmG0sf4PvWQApmINVQbSpdAbePb9Y+IAfH8mHuqRL0XcxJO+xesDyI0w1Ofa
WwofL+RQ9QaAmgQjc3NyvXVaGSEt/TgZ69swbFOKlPo/Lz/k9uOG6+Gj/idK
wZEuZHz0WT+qOaeME71KMffAsCHXtR/GWrrmk7dKIXhBYZseWz8c88dsIgpL
ofTwjMUb3T5cu1PSJVZeCmvf4HPLu/uQbP3oePaXUjQv1UVkbe7DyMwB+6/t
pfj9M39CitWLs//EnJBhlWJw4I2MZlIv7nO49eXPlkKlL6/X/l4vPlD3Ox39
W4rOV7fF2wN7MXt2yPkCTxkqZgzDqq17cfWthlu5dBkycrtinwr2IjFg7ail
QhnsunSEHTl7UW7Q7/5DuQxz/56oHxllYNX3CI/1RBmIi66tW9MZuCfN8HK0
LUPg7xLeKTUG3v/+MDF1ogzc1KVxD1EGWspvnw1zK0OIQlJgIBsDwk7K5975
lUFix+F2l/oevEi46bcQVYaHOTfW7fTsQaTJmaM+j0j/KCvHTIse+HOYyw49
LYNGaFsJ5UAPLFwl6I1pZDx71R38BXuwZleBdlJZGfwcfg1oVHVjlpG4VfhL
GfjZlx+zPnRj8P7t2YimMpTIDjXLJ3WDMn0s/QK9DJep97IlQrrhV8QU0J8p
Qxp354VJrW44ne0YL1osQ9608/PYf7phvK24SnlFOYhPrB2fpbshdzPCfwt/
OUxseD1deLohrH7e4v7GcjCDmnaN/6WD87v1rpVby8HdKuj2fYoOhtGO/smd
5Wh2XWVN0Omo/8tb6KJUDuttE9JxVDrys349+qpWDve5jzEnq+l4KFiqX65d
DjZuqxu6OXRcr0qV0jAoh8uYqKxDOh1nL0ctvTUh/XWD3g0m0WFAP/7+sX05
Ljfnpqs/oEM96mAEj0s5coQZJhyRdGwndp4K8SDj3Xx8t/pNOgSm1mHapxxK
C2Un2oLpWE6eEfG4VI7bnvvY6JfpGD/WPdUTVI4TJbvlDHzp6FpVUW8eSu63
+vqimDcd1Z/fvK4JL4eIvONjm9N05HjeD/n3PpnvwkmRPy50JG29bJsdS+br
4JOyeIKOe00OKjIJ5eD3oto729MReE2X71lKOUqi5U8r2NLh8Y/CKH96OXoz
z49bWtFhNSRQdvN9OSrMh/n6LejQif3zdD6XrEeL+J96MzqU9XsvnC0ux+BV
7raNpnSIL1QZD1aUQ7ZjpKHYmA7ed+922tSVY+79Tv6Ko3TMOzxc0Uglz88/
54s0ySP8Ad0HO8n8T97aOXCEjtayk7m5PeU4HMd/YoHkMr/D9xWGyPwixxK8
SP/MHbs9E8fI9SVXbdpLrv+sU0h341Q5NOciOOxN6AgPXxSLmCtH/WtadCcZ
zyXNgbnlv6Q/V8z8G3M6XCa+0Py4KhB49t2llmN0mL3MevudpwJn+PdrmVrT
AbPYMAcB0i4ff1/qOB0KnMEnWkQqYOJhmqLvQMfmTy77DotXYIuC9Keyk3Ss
cjcULJKuwOEOIa6oU3T83qQ8sUehAj6Kes1vyPOYW5vcp65cgULe1qovXnQs
sgu2/atRAY21xa67zpP9+WO6QF+nAi8DX2tWBdDB3eOaaWxQAZHGXK25ELJ+
tI6kYyYVmMtzj/IKo0Mo//Odk3YVsAv3ey0eQ8aTIRfk5lSB0Uujh47H0SGW
9NTHy70CnHXy3R0JdOwID7K64leBuENVcfff0qFmqyV9P7ICsrekAmZr6dh3
NFskNoaMZ//SN7kWOg4clOJ9HleBQe2W9/Hf6NCT4/qVlkLGc3Q+UvEnHZbz
NSUlhRWITCT6+Dd0w3Zib05VWQVSivMqRLZ2w6H/TWp9DVmv2fUt1jLdcK2N
jOpsrYCgt7btVc1uXIo3sWOOVyBth+0rq9PdCIwqNZ6ZqgD/f7pnBC50I+S6
svbiHJmvoK0e+7Vu3PYQlOPmqgR3UaPalSfdiNvXOSu+tRKjMVTdivpu5HU5
PjA+Uol2k99nj2v2oLCxOeyYeSUs33VpbzXsQUmZlv9xm0qsGRON4LHtQc0b
qZNupyphLfNfiuflHnz1H9l1NagSixJ21xVzezC/+WxtxrtKJAj5b7DUZED5
H/bHajmVUKrXiNpmzICn4YOTxfmVqJV9snmTEwP0gNy5hupKPIvfZBp+m4Fi
+vKOn32V4LirXOHawcD1hOgb8hursE1T65bhgV7wSGZrpgVXYSNbTnwRsxdb
dk5nJBpX43ULIzYsuB+eN9Y/zD9WDcnh1LVl4f3I71a80nK8Gjyliq2csf2w
iXHV5nKvhun+lKoXmf14vNDR4R5Sjfv8Bn4yff1Y35jPpvS+GmzCqfondAew
0jfErFigBjFC97Y+Xj+IyUKema62GmhPv+zPyh5C7Iqn1zwsakH/FbZuX88o
jlv5Cvn8qkPMTiL+Ktc4SuaNdIP+1OHpwtIfT/5x7EjYcSF8uQ4y7lkGpqLj
mBr82prCU48C5aWXK/eMI/w88fCrVD28tw+ai9qNI+/u2g3aFvXgCE5OHs4a
x8aKVP6NH+uhLt6zrsPiJwLdrhFSBfU4XOHm1OrwE/1rjvsoldYjQ0qm84v7
T7wz5Ws2aKhH+fnfws8Df0KH4Xfv6lA9BD9YWA4m/4TvvBbfd6EGvHVKPcNi
/kSzEp2n8GIDtmYbfB8KnYDHXPsGw6AGnLXgvpBA3s84S6iiXTca0O0YLnok
bgJ7javl56IbwF/v/zoyfQJJXtmGKukNaEpsVX9InYDfm9sRbxkNSLHKfVYq
OgmR7ao8zw83ghqcax+QNonssd0bFIwbsbXeK34yaxJGH+REC441wst+V7DN
50lcOygh/9WpEeInzJX4aifx4wSPoVBQI766i8/N/5hE4fO+8LvvG/FMcZHT
R4iJk8JRa4I3N+Fv9Ne9p0yZqCqN95yQaEKo9L11IxZMKJxJrXeQaYLr2bw6
Z2sm5kpKoqDShK1jRtNHHJmI8vglwH60CVW8TcuDZ5jIL7IWDb3WhIt3+x9u
vcWEoIuUQvhoEw7WMqo+5TLhz6d0d36iCZRzBygP85lg5GlOeEw3wSyH57FX
ERNtK+U7pdmb0TfAx1hXzsTL4zrxK/ma8WfBvndjIxNqXJfEamSaEace+nnX
ABPO1vQdhseb8ZJGN7q1moWkRplBQ4dmZOkfUXnKw0Kvjm+i0clmRL7NTH+z
lgW7PWu2HHVrxgn5YsPC9SxYrNFYb+rbjLCpnuNvNrGgV/hgwTKiGZzbezZl
y7IQqszIs4pqRkee4p6rciyUpcldtL7fjPCzJoxDCiwceFTKtIltxqokfo76
3Syoe08O2SU346bp8tkXaizIShg2OxU040BYkJuvNguujx/fdS5uxmKSnMK8
DgspvP0GLqXN8N8dGR2ox8K2P5crT1U34+jB4X1++ixspr3Od29pxkaX5zK7
jVngCeV45T3WDC7v1F8tNiwYzB9xOjvRDD3XbexCx1m47fNE3IfVjLS7Y3mm
dixw2ivFn5ttRnqtrVyxAwuLqg73/FZQUSMzL+vszMLEyOcr/qJUtAvu+bfH
k8yfKSRVKEaFiSTNcfIMCy/mztUvbaOi1oByacGLBZPVcuLXZKnQOZ0WwenD
wnu5+IpbqlR0MvNOdPmysOafGa8vGlQ8Nh0yKPdjwWm/mTCPJhVf7pcqp15g
QcBojUfUQSqOOvYsO15iwc/Lf90jYyq2Xd2f8cifhfoL7XntZlQcfHYhxTKA
BelgZScRSyo+scslCgSy0B71I+epHRXu03eyA4JY2BWr59DtSAWvzeUvssEs
hL1IWiXuTIV2KlklktWzbG2TTlMREMJxTCCEhei8TysGz1CxbDSVkE7yaInA
O2kfKkqCw+ZwjYU4au1y2kUqXmeYMmyuszA/te9V5g0qVNbcfGYWyoLZwuOj
rDAqvklnh1aQnL7i16xyOBVdf1eG7blJ9pdgusGnaCo25y12LpKcs2XV79kH
VAivWad4PIwFXmnn53tjqdg1LfMih+QiVVFm4XMqesOO9VvfYmHjgUtP/r6k
4u7qoY/JJHvrtRwkUqiYbDvz9jvJVUd3j19LpWKPoly13G0WxKwiHpW/oWKT
58lVbiRfdBw5wJVBhTmHiXcCyU1u2qN676kYvrxvqZlkWZ8X92/nUOHv4vTx
L8khlxf21eZSwXDlj5O5w0JniNUgTwEVfnJhrw1J3nPnw90jxVQ8ceDt9yA5
/P469XulVCjm/DC8SXL/E8/e5gpy/67TQ/Ek70uqviNQQ0XHFWpmOskP3kj9
Y1FHxeI/3m9zSR7Pvkp/1Ejan0XQi0nWKfh2s4NKBcdeP61Skp+Vq+/e1EbF
Rv8r/2+frnvQadtJxb8FQxn/+//R1slrz75R8ftf3vz/rf+abijf00Ml72l7
l/+3/9/B1FbxfiqeXSm6+r/4LH+uCD45RIWb8KSmJ8kZ044yyaNUzHzeomFE
8qq/Bc2DY1RosJ6elyXZQ6Z75eQEFcmlLpUcJDea/NX8w6JiB7f6TCdZL2V/
cd8V01RcGdq+Mp3kx8nEf2vnqHi5QX/mMsnz9ScZwgtU5Ax8qj5IssPMdSHJ
v1Sk748M4CZ5h37lNTVOGj7NFEXdIs8z/PxwLrGKhsZ5EyZB8sTTVRMGa2iI
rHirMUP2x8cJfVtHfhpEfshftyBZRMQz+vQGGhI0Qm8ukf0VqBVZ5buRBrFd
Qn5JJOs8bFS+vYWG9sdGwr1kf6YVTbrHiNOwmVep8TLJvCP8L55J0uAgW+K3
luSWveY872VJe8rJR3I3yHlldAx8VaHB6OF2HRVyHqq4/2waVKfhfF1/7Fty
XuSUN5tM7KNBitNsUIJkVqhdIYcWDQ++VngukfMWItf3UP4IDZYSvRZh5LwO
mnPUqZrQEOX/824POc+Hg6TYCXManGpqapRJXtd8ysvChobsRr/DTVdYSLjw
QzfoFA1vc/vvdV5kgeMFT+AtdxrczANm+Ul2rVHIvu9JgydlvYcuqSeKomfF
Xp+jgY+9xy+J1J/Ckl8zjUE0lO/z0FIk9Unih6Di1xAakv/12qZ3ltTzDWrO
Azdo8LEvEDruzYKh6+Wm2Tvkfq/JMyX1rotnKVXiMQ1tmSn5Ye4szFmutDmf
QcMLyVGTEUdS/89l7fd6T0MYbZhaTeppRKStmHsODXO1Bi9T7Ml5LMsYsM+n
gVclf6c5qcc6ilbe+lU01Lce4gu1ZOHeirQbEj001AQoCasZsWAtZuYq2keD
0relX98MWJDcu3h44yBZv2g2pWBS/3O8Tfh4f9BwRUWwNpf8PnR9nYubnaZB
wqz81TJB9lOWfkbj2hakGZhP96uwwKz9Ff2FvwUcPKaGxv+w8HnouW/FhhY8
FXESyNvDgpHolEb+phZUWinNBe9i4XxYfPkr6RY8eduo1S9D6pHdWGfgvy2o
GD9QvUx+Dy1W310h79WCtylPPRIWmND4dIjm6tOCwZjj3Gf/MCHqzJGY5NuC
XiL1xf5ZJvoLLx3Y7N8CmaZHJTVTTJzzcbqy+hbpv9HnV/Z38r7QoT458rIF
sUcbbGramfjyqr8rpbUFry00OdkzmHhr9vy/3o4WuL40vGeezkT0stXlLd9a
YKs6TCSlMWFt0yD0sK8FBLfOVpVkJoZ580xuTLTA2j+gb2ccE5x+d6tOcrdi
d2tSg8M1Jvm+0MgW02wF88UN6qwJE4r8eWul0IpUbulfq44ysaVH/bTMwVac
m2XrEzRkYv6KuoTS4Vb8rauSltZl4tN7tSgti1YIxW0+L76XiV3bVD1czrRi
g9Sl1YESTIizKUu+edaK74VLwZ+/ToKtWD5GdakVkWJdSpNzE1gtVvjVn60N
9t2U98PMCQgEG20rWdGG69uzDTpGJyB9wCvLYE0bGhOEmpI7J2BQnNHoKNwG
I4sbp3/kTuBh8R6e8D1tcM+uFVe6MAFZinpoz6k27NydopT54ydMSrQv3mps
Q1aNsz5X2TiucKVELN5vR+tXrZGjx36AN4Uof2bagYulAanbXo9A8Qv78qVt
nSi5o7P+kecgZPbwnLk40Akn7ahPN7f1IVN8b3fmx68g1oU0lsR0IdEt2Ucw
tAvuQ97vw4JpODN1TPWZzjeM3hBQf0i+kypXKP51EKKD7XZat4v2Y8xYGc3p
dNJhIqdQcEWmmBLDlSZoGduN+t5DOeLpzZTCvbKqSa7kO6lyUXDTQhelOIsZ
tl6WgcZheytaYD8lxvIlcU6eAY6bjVvuPOinuC0azzfvYuBv+DtH7Tf9FP7D
mV7RqgxszLlgV9bRT3FmeFms02YgxVlg5w/lAQo339i2tQ4MWNyUqO79PkAx
9xwq5H7IwEv+6lE32yGK7PpHF91jGeDzUiu5e26IsvhJR6kmnnxXZcnz5N4e
orzmSEm+lcgA/+Sz+Q25Q5S5J07hKzMZINwPqc9uGKYk1DCsOGsZyOHLHXFq
HKac97633qWBgfwozzbK0DDlkCDqypsZUOoRU5ZYGqYwHRMO3CDfZYO5Dupj
8iMU7Vk7aY4hBmZsXp9+c2eEIvKcl3FylAGJ1JhqycQRyvjBwrjSMQbm75vG
JOSNUB5HifJem2JALFXU6+XICMVDpa6yd5qBi/GJgTuWRyjo8r9K/GFApGhg
NnPjKEUwRG7vy0UGvLkTejR3jVJGpbumlpcZ2P7+tlKD7ijl/wB+0Lto
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577223064*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwd1Hk0FOwXB3ClhEpEZc2SvVJIiepW5i27ojS0KEkkpLIU9Uq2IpVdIbQw
lhZZIhlkGTOM2bfKUpIkCUnLy+/6/fGcez5/POe5597veTQ9A51PzBUTE2vH
M1vvnMu6Nlr+Ghrcn8S7Z5HI6qE/r67pfg1fNmyJckE/uLj/so9UM8wUyXnb
oQ0vPw97sKEZFNQ+2Vihn1yRO9fr0Qx5RTM5FugNMYH+qgnNcEQrWHk9uia+
8ySxqhlWZg+l66AhcbVnal8zNGc++KmEbr557RBjUQvUm50aWIS2Sfnkusi8
BV6w1nFnMklkevo/e62Pt0BFjaTqd/S+O/ftopNaoPvN9NI+tDBnzq6GmhZY
MD0hxUQfyffY/re/BfaqVXaQ0R8evLIwl20FgZqYSynap0jF7LxlK3istBNm
okdKLqx76t0KAyvTPWLQ557wDYZvt8LIsX0lAeipcjNt/VetUD9/zfAB9KWq
lJVeg62QbFutvR09t/a7Yp58G0yKVz7RRce/cpJ/u60NfBWHxhahFzeWLVY8
1Qa5WwnK3zNI5OTmhZL70togI9Bdn4tWpPjOvdXQBtPVTfrV6Bxa21/alzag
iktPZqK1unR+LlhBgXormbkX0IWsq9+tdlLA+wMzl4hew+v78q8/BXKbtvVt
RJcLYeBlJgVSj+mdVkBvepfT+/M1BRauIUp9TyeR63r/iEy/UeDqgWeFHegd
/W7cQOV26D1ZVV+Ibv1U3VXyTzu816jIuIK2/7KM+ulMO+RHqhocRDNHzjWv
ym6HEJi4aIp2HWPWe7S1w30Jy8SF6Lc/1tXcHWsHyUzD5PdpJPLRXzee89Wo
wPuS7luDHvj7pUzehgrH4r943kT7idkWOZ2nAiPCMcYLPSpeVJBwjwr77eYl
bkaHLJDIaaNSQax+Lm0x+o+0V4b4JBXs0vvv9KWSyJEyTbdBkwZZXzPFKtHz
l2okhtvT4NqxkY5Y9PVll2OrQ2kgEzF6m4iWVXobOV5Ag5T0MVdDdJqqRfg6
Og0Un02o/E0hkZU1MoP9ftEghzbZ24nOWzUZWKjdAVoDUw/vobX19p364NQB
QV4j5wPRxYblXurhHZC+WkIT0OuMZD0OPuqA2jG1Thl0hXGAWwazA3przC50
J5PIFmYdLuy/HTD/ioPOY3S9uaHjEv1OMLA+wbyEJmyJt7Zz6QSnvoN29uh2
GNgZd7kTpvN+JyijHa0IW1+TOqH0aFbH4G0SmbOrYNMMpxPcNcwXV6PdbMVM
LMXoINXLc4hBdzscWRO6mg4v7gUnuaC99tbpPnelQ8/WHQRN9OA+Zc1vV+iw
z7ugbuQWiRxADFNZXUYHSpK4WR16/CBv2UkBHbZUe5VdQ4d5bJC9L94FT3ta
dA6gpz2TpXuMukBHUi9XGx3lPTpPxb0L3PjKYmM3SWTJU44zrjFdoM1+ZENG
3/Av/ZX8tAu+0U1SEtFLg6Qn6G+6oJZa/9YNbW+xITRGnAExrba6emiZLcfP
r1JiwJ4mXuBEEuZva3JQoxED3tHHaY3oVGgM8CAw4JYRM+Qm2nXHqN9/bgwg
JD3WPIxWslL3vRvIgMmvCR2G6LcER+/NMQwodvANnbpBIufuunScf4cBR8p2
abWij1mXHg1+ygC5xdqdKehVtm8Oy7cygKnntckTPWAnffDZGwacDNOlrUcX
OWwmOn1nwF/K4JGZRMyzk8/+rxJMSFYqGetEG+3NcE5QZYLeKf/YbPSoc6uT
gQkT6mrXKfuhn+/7Yd+2mwnUyTpjC3SIq7bticNMcJTQNpJGmxNddoufYwJn
WYKhKAHz7xZFyI9nAlFnTLcYXX/w2Q7IZUL3BrdVF9GRh3u3vXvOhOOEBnVb
tJXHki3h7UwYdNFTVUZLHNu2WamHCdLySepfrpPIFE//jdUT+L7I4kgd+rpX
tul+aRawWIqVN9AO3rT14+osiFkySfNAy/r8XnvbjAUW9uz3xmiWr8HqdXYs
+M9k0HYeOt2PqN95lAXWhEvG/GskMtE/TscvhAUhxtObitHKgVVaUoks6D5H
a7uEfnfmo3phPgsya6r696Lzziqo/VPNgt+92dq6aM/zVsofOlhAfC2Q/hNP
IuuEnF1x5T0LgkvuGDLQg6H5CupTLEgiG318iC6+wJB7tZgNqnmW8hFo//AZ
mYOr2GDzM8HaGb3+ktGiX+ZsUKy+SDFAj10+LJXhyIaBEF/rOejKyEQJMy82
VGwkUgRxJHJo1Etx9gU2MMvmDD9DW0QPiQXdZINGb5h2AvpvjNK0zEM2BCwd
PeSFJsdZ/ymtZcNLwsm0reioa6FTtgw2LCBkPlVEExIe/Rj8yIaV/cGs8VgS
ecEN7ljsHzZsjHaZoKOpSfNGteU4IOX6mVqMTrxl+rVJlwMGlTGdcWinZM+h
o1s4YKOgxfBCL029/Wl6Lwd8z9WzdqA5aQ392Sc5kLVwv5EGOj3jW5/FJQ5Y
fz61ZCYG/4eslT2CZA78bI0cfYdWvevwNqSIA7rhF4mv0N3ZEUKFeg4c2RS9
PBedn1vCK2dzIH38Bucy2itPxN7zmQP0JxnJHmjdAinmyDQHPD5SRDvQn++b
0xMVuCBtOJyijS59eJJmaMiF5wFLHBagAwrTKRTgwr7OxypD0SSyMamlxXs/
F+bPKdfsQo8XTzTN8+NC1YZKvQp0VemqhoJILvj4vFibhQ577PxqezoXlLJf
ml5GWz69UttdwgWLofxCL/T0s6fVEY1cGJ023WOPbnjeU6HM58JD+dYpU/TV
SpnyF8NccNcn5qugd1VvfeI6lweyW4dsxNGSNadLJ1bwwCLv0oqvV0lkWu1d
UvJaHhT3r3Dko5PqqI/WW/FAxaA8uhG9p/7XfTqRB4n+9i9L0PIN+vmnA3jQ
zX0tmYnmNh7IlY7mgeaivNJodObr2LtFWTw4vjNiTxDavaUyc9cTHjwMI04c
Rqu19af1N/Pg/mDQPXt0L0U+JUrEgzDDHxRLdAF15y2NUR7Ynw4bM0Sf6Ai6
UT+fD5qP/6goo/XpedcPqfBBXyNjRho91NUV93s9Hx5zXO78jSKRy5jT0Zm7
+GB6TdZsBH2GvTZq4yE+nFFbM92DNuEe+pcTxIeiJNNPbPQPXkLE2Tg+dM9Y
MNrQ1YLaC7I5fFAI2lnzEn1R9DnkcTkfzO+VGj9Db3mreN6ewof3Vx98LUTP
vNsdNPSOD9d9skm56KaekID4cT6YOKSeSENH9z3005USgMg4UTMRvfsDx6d5
pQBedraxotHSH8W9PTcIIIATev9fdMeAyXExWwFovdE7fxF9c/DY0VwPAfD6
+IRgtPPQrcNbggVwfTBu2Rm0wjDZXXRdANu+bRo4heZ/HTkQlieAsR+fqk6g
s76p7V9eJQDx9ZSjnuhD3+2dK2gCOLKWIT7rlePhTs59Aqg1FDw6hu6bKLYf
nRTAcv1em1k/mBTaJC0SwlmdweGjaO8pyd1rtIRA1xq9OWuD35sI1E1C3MeU
yayH/3jv8HEQAsnY5d7s/cf/pW2TOC6EwvKe//cTNNNs+SBMCA9MT9N90aZz
Jsx3JgmhoGLqoz96cu6qjb33hXDPLOa/IHTNPGfTyzVCyK6SWxaCDpe4sl61
SwjhC/pTItDbJJ+ure0XgmyroGJ2nmLSPYbE30J4FN3JnZ3364Uy+pNLRLDN
qmkyFR27eKtOqo4IOHOqV+SgrZec1jKxFMGphhLzh+iFcnfVGXtEUERv3zm7
b/pSqmqAtwhSyyyjXqFvKfxSWhQhgsjEssZ2tMty/RXFt0Vw2k99Dg+9TPGA
gnWhCIi2t7e/RwuUYuUG6kRAMBCPnM3j/wCHjKsV
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwd2Xk4lN8XAHBJJUq2Sra+lqSSUJZKHbuKorK2kCVkT1KEUCl79qSUpRhJ
kX0bZsYuJTGLQQtRSVIh6++8v788n4cz7vvec8499xkpe68T5zk5ODhoyzg4
iJ9v6tTVLuzKJFtPnHTz3UAiX/i6XzJ5IZ38w0Yk+pAUidxXzJJRrYghT016
bbVTJZHrFRIlBoJtyQXJxl9+GZDI1TrBjZ/Fb4KM1ssEP3MS2WXg0ddQkVSY
e7Hgp+NAIgc7hoXZZ2XC5A13ThdPElnsyUbp/rRcUC067995hUSeiBT1oLzK
heXa3cJ/0DRviYrc17lQ+aogedNVEtldU+aYz7I82GNPM3RE13QrBqy6kAdv
hb08Z9A2nAbvlDVIMBI43SEWQCJn2fqGhffmgypFa7VJIIksL9r1aZdQIVxw
eWB+IYREtuReSLTeUQhcn0avhKPDp+T1b+gWwuW3wzez0cPvQnJ7LxWCDm2N
bT86K0rJPeh9IVzc1CVsGkoiiy/E/W1LfgF6r/SjlcNIZG7vrVy7o19C8qbb
fUM3SOT5E182dPIVw+W53lC+2yRyYELdoy9ixVA5eS1SHr3QlSK/JF8MSU0y
gTroRVPDfUq6xeBQ9EjUD81hknc24UoxfDLR0WejuYxccyw+FEPDTw7rnDsk
8hrdceXBolcwupdRIRNJIkeHNVVN172CFzlSv/eh11IydPk7XsEB56iNJ9B8
2ibm2l9ewbnHnyVD0Pzw8mq2aAn4JjyW70ML7/chO98ogXzfTUoxUSSyxO4p
4wmzUshtdzj6MZpE3qMxebvdrhQ0Vo8F/kUbHxinPPUsBW9en3urY0jkAMMv
GmfvlELh4r1EZXTv6V7ZtupSWDd7ID0Effdm2Xy2dBl0dByYFo0lkTl7/Qos
J8pAerJNXDuORN7U5zOislAGApHH2CfQSh88pfl4yuGkPPuOI9rmm9M9mkw5
cA6qkW6jqxctbipblsOdr92rXqN9t6qf4a0rBw2FGV2zuyTyyNVpXnJUBVyz
k5s0iyeRFTi5A2pSK2Dy2l5rB7R3lMhoZXYFCJeVvryInn24l1ZSXQGmNlzK
seg11GuB+d8rQHZX2ZUmtMpajh/JRpXgctFQZk8CiRyUyd3pzlsFvyP7pbgS
SWTK9k2arhuroMqBO5sfvbJkW76zTBUcYl1cL4G+23Qk3H5/FdBlxDpV0Vnf
ow9auVWBc1ZInBO6RVXghW57FcRXnrNqRAu1bborGlUNTxLuK11NwnpLdy8U
u1cNj96Vv76B9vQgd4g/qQbVtT6n4tBt/OdXbyZXw+POAZ2n6BDLl2Eyv6uh
sy7MtBs9NmRwWeF0DTjH7XPankwiNy5dOnVwRy1UDtuUdqB9upqugkYtjH7b
adGL/i97U6qWfi3MRWeNDKIDDcjdOra1wOf2kD2JVonhOWqYWAudGXXrRFJI
5AzRTDCdw3iV7kxb9BXVTln79jqIYUsXfkafiFL1u0Wvg8e/zH5+Qyt+fNCc
9xl/n8EtO4keinZz/TlXBwksPheOVBLZdIj7ZaACGX5YHD0tjpZP1N2fGkOG
Z406f46jl3/Nj65KI4OFRrq3FXrgoOBA/xMydO/q/2CDTvr2IUS2jgxqYeoP
3dDLdIKbisbJIGQ8e+sm2uMqW/7L1nqgB1lLlKBPydztmt5ZD57fj/VVog91
6gas3lMPV4uSYshoWdln7Qpa9fD73fY3bWjWG3/PS1b1wMOzp/kD2mDrxhKO
iHogORrd5blHIm/uPQ5i3+rhsSmz2Byt/USuvnCiHiBI3+EU2sF3Tktnuh5c
hEZW2qJzBZ/oXOBqgCzNb1td0LtMZvTLJRuAeaGzyx8NLRnGJ082wGzPdPt9
tF3qpddfrBvAutDrVQb6htOhYwHnGuCiYnpsFrqZa9Ik06MBUq4q/JePNtHW
P/nzdgMIigsVVaBtq75bR9U0gJAU5W43OjSiniVJbYAnGeLlvehsq+TTxa0N
sGSQ28VEj0wdPMvsbQDbObfPg2iv3Qnntv5qABNqZMB3dDyn88eq6QbQv3xQ
dxz9qmu//bHFBqj6asvxCz3tNexwmZcCmVQeqyn09QINZ+oWCjACeoM40kjk
zGtrRy0UKGAY3fmNE0098snlmwoFvG9eNF6BXvU1ylVAiwJuab0/VqPjtgx6
2J6iwMqFXyRBdNGfV+OT5yigP7u+VhjdTb3jFe5MAbFYqcYN6I32Khef+1JA
6MXaElH0o4xbvnOxFOj9uIZPGh1t6n7MO5kC5vWGDTLoAM6T8sPpFDB9xOO6
BW3m9B+7M48CAjV6D+TROiKrynRfUGD7lrYt29G72n7EVZRSQG7od84ONI9i
tW4WhQJ8T01vKqKnBzMlNrZSwKEpfmgXeij+znTUGwrs8Evcp4wm/zV/dplN
gcJnf5p3o31rJwQPT1HARPS3iwba3os+VjtPgXDvhSt70SZSdU0qy6mg7ccR
tA+9/VZUgDg/FQaC1lzQJJ5X3ccsfgMVDvrImB5Ac321UlwpQYXMuWM7D6IH
jeU+/dxGheKMpVZAdyyuqXFUosLEg4QILXTVy9/JTDUqrPtnDtroXHuW17ED
VPjy2PQ74SThhsNUXSpohUTE6KDDmnJlNI5QQTpslZwu2utq7EKBKRUMY7tK
CB9hny5KOUuFNbbnS/XQ6rE6UbyOVPD6rrlVHy2rte18iCsVkgQD4wgLTq6D
v95UCHu1bZzwUvaUiOsVKngWGOsaoMfM+ycHgqhAZXyPJcxaRes4eZMK/wnx
dRFursx/2hJJBbPdVasN0SVu8SEH4qkgxT+tQThL4uqp4lQq7A1utyEc98Zm
z9YMKoSaHrxGODBUn+9BDhU6LC1iCbvuVhjlf0aFRw6i9whbDgtSbhXherTj
/2+91H/ps+VU6KtpiCOscvjDZa86KlQ8Kg4ivHmuyWSIRoXGIld7wmueP99m
3Y7PXzlxgPCsTdLyzi4q8F8z4ic8wn+tX4dBhV8VoUzied5T7MrLB6iwYs/9
NMIU30PxCsNU2Pks3ZTwC7ldbpnfqbCnL3qReF8PGOv1N0xS4e1132zCkZHz
klEzVMg5bg2Er2h+nllapMIct847Yj8cx1vf+a6ggfFp1TOETzx+WfCVlwZ/
5/b2E/sHJ1LDbQRpQH5oYU5YgSv4XLcIDU5PxNOI/Rctc9x3aDMN7LMmtxP+
s0llXFmBBnbvD/YT+TSzNvujugoNpCQSVAnPLxPuOaBBg1WRhuFE/nF9+1t9
WI8GVg7j/ER+cg84vTA5QgOFlG9HiPxd846eZW5Kgwp/myAiv9dXVUbYnaHB
ybeUdiL/RQu3Bznb0yBmsXaEqA/JrHRvDxcadJ00mCfqRy4yyNLflwbHWULr
1NFqp7S3xEfTII+uzlZB7ztWLJKaQAN6i3ItUY8HdWTWPLxHg7qIzylKaIPt
K37n5dCAo/TGHqKeLWZb6utraBD158imbcT7vG96ZmKMBiPhCTESRP7ENphM
TdJgpd6NeTF0SJiK7vwMDbgEQxyJ/nPHVXg794pGyCMXb96IvrePMb1ZohFk
ZGN1+dEVLNtEk6ONEBnwVH8Zuqbzbbj5yUbQPdNsuIT9s56iHXDauhFEpAx1
F9At+TJ2zucboYF+Re4fmhkwong9qBHcVXdmTKBnRb3aCp83wvdPZywH0Cq7
l6WolTRCPye7tg/tZpRoV1fVCD0nJ8SJfs++Vj7zurkRMlQnacT5UMdekvvx
sRHuavDVtqDDMu7e2LGhCayf7TtZhOaVLtbMC26Ch5dSdIPQevv0uJVuNUEH
hauVOL8CT/R2l0c1gWZTl6Efejxs1rX5XhPci3+s7IV++1kn7UtxE9TY1Zad
Qyc96f4rO9IEvB7HonXQ4tv+FmaaNEM8Wy1uGbHeGwJJVebNsBjWnbSA529V
/07/7tPNcKvNNPkf2jrBSXeFSzMM+3Pc/oVOmaPTXUKaYf+zqp0f0QKdVRxK
Rc3ARWuOJs73lZdCTtQJtoD4xNniq+ifNbxTrJ4WuMGWeNSP8wnP7N49PX0t
cC09PJ2BllV38XnzsQXs/kgmdaNPFdHGqT9a4Pamn/6taNqToJGCFa0g6RYq
UopOi/3JCFZtBdJu3idRaN1z3dXSya2wGGAiooZOXZ4e6mrWBlv1qg1Dcb46
bXlpvffvdvBmtV15j/PgWyU2b43fa1h+gvuMLM6fdhtjeYJF30D10RG1Azjv
Olix5YxOv4W33Tk6p3C+Hh+p9A8Q64KxSTlWBs7rqxar3w5974Ld6c/M3uK8
P2Ox0tqn8B2stF2msS8Cz7fVMct3eHTDKL8ao+02kf8axZKa70Fd/d8Hx3AS
eSd/xVoZeA/7tplznEOLD6hf2KrzHjQjjKVPo2f91f9TOvQe9iQLeB5HlxWp
xWqbvYcdFfxbDqIVpVRdHd3fwytRsoAIejOHinT+g/dw41rM2OtbeN+p25Gg
uvAe/P0yWdro1ZI1zACOHnA15Dh2AC0YbCxVv7wHyoaKaRroLQc9Xh7h6QH5
2xtrdqGP1BV22m7sgVV6s+8k0El1yryRyj3AUcSRNXsT50ey+s2B8z2w5vOL
9jK08uaWdpkLPdDf6fisGL3vupXQBfceOHgrKrYQfRT8s3779IBTs7LtU7QP
uaqeO6QHdub+25aCriEfWFC53wPxYbud/NCm9bp+tzt74Lv8YvBetKN22pHk
rh64EDu1Rg3tTxmXzH7fA4MqKzNU0Fm0tOY6Vg+QMjxad6D/tvwUmfrSA9nZ
HvqS6Ptd6dWOSz3AP1Pybjl66NNvDh2lXnAaPmrQhffLGYfDPSa7e+F8wGGN
TvTa4QzSWbVeuC7oubMdrTZy+IS/Zi8cObFHqhEd8f1R9stDvaAjRlWsRCv+
MTLYbNcLxRWWnzLR/ityoubje4GDP7fwMvrPlbA1c0m94Ki9IHQJ7fntXMy/
1F44auYW6I22fyMRN/WwF3JK7lq4oY3TUhMmSL3QYcCrZIeW3BmVNtTQC0J/
ha8eRVPMfHI7fvXC+5/LbeXRms2m8u1/eqHfhk9eDl22dxepdRrjpTX/yKCf
SY7lNy30QtkPzpTN6KTR84X1q+kQb2mwtAHtHGhdWiJFh83loy4r0WtytKgP
jtPhODvj/gjexx/n7VJim9FhYodZ5jBa9bnkQzErOthbNj77jLYpm/e7b0OH
jBvs9kH0y5aK7ffc6HCn9YsGA232Qykh8RYd/I48b2pFj/7avPTuDh2kLPRW
t6CDpvjcBaPpMPkl3aQJ/XRpTD8+gQ4rSDEjFPSMAOlf7CM69E6E6dWgH6hJ
2UVW0uGD9ljxC7TSfv7O1ho6WP0iKReiG2Fp3+p6OsivUygpQI8f6he+00SH
j5eDaSS01um0llvddAj6bieYgx66LqAU+oMOojOmDmnoqzc5HtZP0CHQxlPy
HnptxM/VHH/oYGd/sj8FrZbw+nPwLB00/vo6JaHv5ESkBq5iQP5ysadx6J2t
y5auSDHgkNeGvnB0x3jpzHVZBpwU0Bu6hXYXdp28vZUBO0rrJm6iC2zfDafu
ZMDRi+lCN9AKU1kd5XsZ0Pzob8h1Il7MsomsyQDF/bE5wUS8Nm99MzDgdq5v
exARH33pFV2fAd9Md8gEEvEyevenjzPgl7XO7FUi/tBM4pIZA8h/jDQIu3sW
xKyyYsAYX47/FSK+Ujh0ow0DqOu0Vvqhd5gOO6u7MiDy0DbDS+i2y2l24MEA
h9G8Rz5o1/Sjpw29GWCdcmXuIjr/S+kxSz8GmJ3hrPVGbw8KV70SxoALcm+c
PYn4rH27rt9iQEBPC8uDiG8Zl799hwEtnILHCecLWYqnxjLgx8pEQ3f0kb28
Gx7FM2D/n7ZmN/Q3G/K63CQGTEedMCK8LX/r8vL7DCj6ZHrGFd3ypm++7iED
xEuav15Au/yNm2p6zAAh89gAwnlaM197nzLg+Bbepy5oeXrL26liBkRQqLLO
RPx8YNtiKQMO0ys7nIh4aWXaykoGpI8vXSGc55FWvoHMAGO1QMZ59KHEo0WS
FAZMeBTHEB6tWPZMrpEBv8s0DAjLc7lmqLUzwDJctcGR+PxtkvcOdjJAhL/g
BmEXk3fxBl0MKC32OUyY+3J41LH3DJDwjBAknHd/3y0LOq5Hd2LAgfh/9ePB
NiwGaCnnFhIeHc666tTPgA0ahaGE7/Ba+nh+YICCxQorwluVed39PuP+RxQo
E/40+uY4+QsDqob6eAk/eJykzv2NAcHyP7/aoy2srCWO/2DAv+Nf2gnz80su
vz/BgDVnGooItzV/Gv30mwGz2iHphG9ez+3cMY35uygdQfigunuJ7ywDCiNJ
AYRnxpXu1y4wwPeDkDdhd5uq8yZcTDBvTXQi/OG1rvJHHiaw/LLcCd+/xb1x
Ox8TMuH6ZcJmB17P+wgwQecBhBHm+xv/qVqYCXWhnxMItxZYtHCJMKFhyDX3
/+txFCs8KsaERxU95P+vR/xDYookE5InZNj/X093jv+gFBMir5vPEy6OumAr
v4UJbyxd/yPeh7uuov5FeSZsdrU/RFhubnJ71Q4m/Jd3wJfwfdfAKSMVJpx3
ekgnbCatzU5SZcK6Jql1xH7xsVZQ+jWYsIcv4gjhsMNxMV7ABHlBjteENZeZ
XarQwfXmrhMm8mOqQsR6mQETfrCW2RJ2k8+STTTG9bTEcBD5JvfBiYdtwgSK
1VZLwh9Sd0zInmSCrkp2EWGzVaXVZdZM8D2v7UPkLx/ZP3PpDBMe33Vg/D+f
/Q7ePnSOCSdynXWIfNf80nyC5cQE5u710kQ9TD2M1pBxZcLfy3WphF+aH5d0
92BCzoHDAkQ9yTayvi5cYsLkOCc/UW9rc36ESIXiehuXaxL12nK62Mn1JhMs
JcveEg4TumL86jYT+IQPXyDqfSqMQ0Q/Ft/Haf6nXugBO6EXLunopv+OEf3j
3iZGUlEGE7aHvF9G9JcTXQ8CZjOZIN3pXEm4SUvOIDqPif1FYc9l9IvNe/tf
lDIh6d12K6J/dbaEe32tYMJxi2k5f6K/X3y/TKaGCTJBwf8IK9K85FIoTLgm
XkO6hi50eeoV+IYJI84TakQ/LSgS4jz8lQn1DZu4bhP98ZRdUtgYE7yag/ju
oMeWv5Cr+cmE0/1p4hFEP7Q4YrRrigkKN//pRhH9ajYkaf1yFnAWHycT/T5P
d1zukzgLgp7vdyHOj5ax/ZVi/7GgLYan8D5Rr8kRRuYyLGi/HDudTtTnqKx3
yzYWGESVJGcQ51306cpCNRY8mr60mI3O6WkxumbKAp32uFDifMt0zvYWvsmC
n805xsT52aFcFrfhNguEOcu/tRH5PddSKBLJghUF81Ed6GN3x8fE77Jg3F+K
8QY9W7H3wpYHLKjc0J7SS+QPz1s7tRIWlGz1fD6EXvl8/oTVEH7+gP3B5Xj+
K19Z53NqhAVDsn46K9BntKXjz3xjQdfj0sOr0K96DN+cm2CBi1aFHS/63GKC
0YV5FiyqN5YLoStNtukFCPeB40TjnCzafdJc9YFeH5xvT/x4GF18zF9r0LAP
5nexgo3R0/kPjKSN+uDri67NJugwh892ecf7ICLtnbsZOvW9d2yJTR+IiAru
tiXmn7KokY6rfZD5T82bmK9ErjWkLRT0weCGkPwctA19KEfrZR8snN9Tm4vO
3s398sarPtj4MaY7n5jXxo41ra7qg6AWRd4itO5Z9uT65j64qiPxtJaYz2Da
SPFjH+yTOxlJRzcu37los54Na0z1V/Ph/LghdH2KqwgbrBLbTgqgnRYXdvqJ
seFx3cVMYTT3v86zMVJssHSSNRBDG49711bvZIPRFoFSefQ7RkmgiAEbYlZW
yuuhB55rznX5saF1a61jEHrK0nhGj8GGcpE3ov/QBU21mtp9bGjj8d2wgHZQ
3RV6YIAN3+u41i/D+fytoCCP2hAbhidGRFej81/TxbZOsEF15bPDm9BndR1g
NXc/OHW/UdmHpikGhL9W7we7tO9KweiEFXnCFqn9MKdV2cSH94mavfKqWU4D
ENvcs8kL7y91LyfCBeQHQVEt89/wHfx7i8daF3cMgnL46+ExtPO8yexbxUFY
O2XU8xvNf+iFx13VQeh8olm3DO9DDoMeZut0ByH6bF+5BJqb77vUWptBeE0K
PmyBPuk2XMOdNAjOkf0fW9HyAsl+LqmDkJ62Tr0LPV+mp9RyfxCuql+PY6Cf
cuZk384chK93hI+MoGfS7CNXvhgES5cVX7jwPpbRMmjJ1TYIHCpeFVpoH884
AcfXg6AWraB9CG0oDO3Ut4PA3iTx2gQ9YZtx8AZ9EPI0ksdt0LrTZ7ZwDg8C
/dQbyyC0yMM1g3ajgyC7XXj2JnpMp+Zew/dBIM+HP4pGp8SKrQmdHAQFoT+/
09Gue9obP/wdBHOeH1nZaGAFXNf6NwhzbgLmz4jvh0K27308j88Xf47nFXp0
C2tyaQnje5iUKvT/ADda2uE=
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577270384*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVjmk4lA0bhjGWMcYylkJKpYXKUrIkuUlJEi2IiCxRoSSR1/JGSqVFspSK
kjaRLSrvc8sythlhzD5UikqSVIhsX9+P6ziP8zj/XIv8ju46ICEmJtbyd/9n
9vEb54fL6uE+LYuoTxohtKN+n171th6yUyuXzJwbIfL/cY0/KEsH6ofHy92z
R4gV8eUn89fSId749oqyJyNEcQLteI8PHZ5zBV2XqkeItWeOhmql0MHvI1fB
kzdCvDz3Osi9kg6Ko502ukMjBFxc6Zf+ng62sHTSc3KEoF8579VBbQAH68p8
/DNCbL322Y1q3gDONluctP96W+bmnfb+DeBU8s32t9Qo4ZJ9b1vS5QbIWZQ9
8XTeKCG8LW5X87IBvqfZFQeuHiW87/pYT/U1wIFoWz2S0yjRm48W5kqNkHh4
Xlho1Chx8NE8k4j1jZDr+auSf2eUGHoSbVgS2AjoyJy2YYwSx4v5eoNXG2Ho
0R/66qlRYrzMZIkuNgIxfGinlcEYEVd5bUFAfyOorDm9b8hvjJCo+qF+R6UJ
KjLzN/ffHCPOobNKt1UTuMSo56/mjRHytUXy6oebIH90sMdV8zeRRpcju2Q0
wcTksckI79+EevMhidSaJrhIp23Sy/tN3GY2TTG/NoEmVVei49NvYnH70t8y
c5sBQsuMW4zHiYedp3/YbmyG8+I39D4kjBOreO+//hvaDFTL/37/wx4nyoTw
6b/rzbB/LOrI7LIJwuzN7Z7f9c1wyotVLxY3QRA9kyLj783wQc6lL4wzQdj0
eXCParbAoMIk896qP0Tj5+ftTza3QGDCTjrp/B/C8asa43NYC5i+8r1I+vyH
YA0dp+vcaoE5+89HVuycJNx+sqp9mlpgeWJ/GZ2YJLpHDV/e/NkC45lr3Nz0
poj9E5fK+fMZYHXiRlRI5hTxaeprkcpWBjAmIsSvS04TwWIOj5wjGKDFaZoq
DZsmhkmP8lJyGcDM1DdK7Z4mImWkbzcxGCD5b6f1SrsZYpISkEUaY8CAr7dR
YMkMcUqh7iosYkJBufU7ea1ZQkp54cUYRyb0ldOYwYmzxAW1+LPPo5gweMgi
rrR/llDS6D71K48Jk1dKs2KWi2GGlkWMYRsTZgcawnL2iqHmwusngieYQLIT
ba29JIZ3dMaOPlzSCuS7Q4v7asRwyXKXw73Of71pDy/9kxgWrCgL0I5phamR
HXFucuJoaKDk4/mgFb4vdliibiSOz1Yf8chitULvDlum0EUcLUxad7OnWoEf
bxl+M1ocq81XOCnqvgZGoYnGvhxx3GR5zn7b7tfwNORUzpVqcWyBTxuT419D
cNDmpM9vxNHJdtOG+sevQc+PchimxZFjl2c2y3kNn73anbO0JNDDQWzNerE2
yN+TbvJ9vQS+3e69KmplG/ju8pi3xVMCA3YSy8rd2mBp9XjI+5MS2O+iueh7
Qhuc0CflVmZI4BH3k/NWFrVBwy15VkqZBP7y5KkFCdpAjapO8m2XwJM+a5Xu
kdrhQMxiE9NBCZzxS6O8M2iHioFVQXKyJEwMHJact7cdhnyHlJN0SUg+7DTr
dqYd5lR0tHU5kPBSaOFEWkk7rCeXXzAOJaHyMcpIW1c77PfMsEu5QkJHi7VR
Z0gdkPw0SqK3lIQKlv4ROhod8ER8b7UFh4SsDWnHag3+dkKHETVGwnSoPeKz
qQOmBE73bNUl0c1mOHjaowPCRqNjFS0kUcNW+9DNox3QR7vv2uUpid2bnALX
nekAD4MOg4dxkphjF+fPz+6AVodJmeO5kuhrX7j/REkH2AQte29VK4k6Dl37
VBo74O28G25J3ZL4aRvFs7SrA3raBad9xiTx0fZ17s4//vpp9VILJSkMdj7o
+k2aBR/M3N+qrZBCg51Zu1K0WND7NUvuh60UDu9qdNZbw4K+XL556z4pLHcZ
dWzawoKIR8X3eqKlMNJticOBfSxYb292mnVDCs3dd28hHWeBWH+1X91LKZz0
SNx09xwLmpLtNpYLpbDas9QGclhweXnbovwJKTy1r8fqTTkLXJpcxTM0pNHW
R9EypoUFmkFves6sk0ZpX6t1Gu9Y4L0yId7CUxqb/UJNn4+wwK188qtLnDRe
CLhl7ErpBO+en9LGudK4PZBp9Eu7E3584QaseSWNSgf/6F816YSkXy/qVr+T
xs5DeisNt3VCpsm6wvIZacwMdtd9vb8T6FhkED5fBt1Dk5cGR3bCQPbxV5mW
Mqh5tHKx7MVOcNnbZ2rvJYNvwj5qP7zbCVdFud4G0TJ4J1x1/ubnnXBh+o70
tgwZ9Iuw1ext7YQXSjT5mmIZXBoZPjfhQycU+R9Ny2uRwf6ou6ra451g3TrW
09cngwXRHTSUZ0PXLe4VfXEyhsbMKnjqsCE4ee6ik/PJaBRnQJ0wZ8NE9D9R
6hZk/Bm/TzbLiQ1nQ968fuFGxopTF6VNAtgwx8d6icdxMkYl/kdiR7OhSAJ9
RRlktEgaEDt2hQ3ROStMH7wg49QZjRmF+2ywtbhOCe8i46tk+8nCKjYo8qTe
bZghY+L5qHGHDjZsDA/hZSyVxU0pD0b7P7Kh6qnrp2lHWZS5xP15dpINa79a
jR2IkEXGZcnhJTQOiDs8CxC/KYsXU42/1S3jQCjDVnNrjSw6p/kN7LfkgMiB
3Z76URaV069+ntnJAXum3xkBhYKcjJq+W0Ec0K3bUz1hQsHMrO/vLeI4EFbf
FuntT0GPGwveCdI4QNA3G9anUlDr5vbuyEccCNgbdZ6PFHx7K1aoWv23m86f
s3CAgndznvDK2BzQUKnPOzhHDgPuiNg7vnAg4vtBw9KNcrgsT5Y1NMOBn0nM
rJgQOfxyz7ztoioXHF/06FzJkMPC+0HMFSu48ODraHFetRweeZjZ3AxcWGg1
50ToZzlc/bihIdCVC2vUIjZWkqn4q2CkTjKYCxsHWYqzelSsLNSpyTvFBZd6
wzdbtlHx5NNdaJ3JBf/sSwWpIVRcX5JQ9fYJFyouD6SvTqHiTGnJ89haLgRt
q/mW/pCKNeXvnmnyuaBOzrQbr6fi6QqFsheDXGDQg3M9e6ho93xDsZsED2IT
bMarp6hIfhlSODKXB63b2br/ackjs+rm4zR9HqjVZyQGbZDHywTjgZEtD7zN
3btVvOVxR/XEvTZ3Hjws0jStiZdHlRrduyFHeOBRddQw+4E8cmv35FCSeDCm
sWjyVrs8Xq8/e/PRDR6kR3c25o7L496Giut2xTwwFJ5Oy1ukgPOb+jL66DxY
SAuW3m2vgD3NKtcSRX//TOU2hR9RwDzGxtSFwzyI7OecS0tXwAOtxy5VS/FB
hyPrUFalgLptdy54zePDKvcdK7s+KuBAe3vyHyM++FdMymmqKGIRaybpuh0f
bik/HHS3VsQwtn6iqRcfdnwTrZoJVcQ1XK9/Ocf4cM5Rx9rljiKO8lJiw5P5
UPckeHdBpyI+F1RFK93mQ5zUXuNTEkr4j+hL5NMyPrRaNJNp85XQsls9wrGZ
D8kp56rqzZVw9s2WYwNv+LCp2z4k0kUJ695FHjn3iw9i+rIL9MKUMOn9/eBl
sgIg4lrau1KUcEsv5yB9gQDsfdeFxz5SQspHUqDfWgH4y6yjajcqYeunNf5i
DgKILTJ/UNurhFf6fffn+Ajg+m5z6wBxGu4aSN1neUIAzybMRNLaNFQdfLVX
dEEAbblmEY8tacj/NrTn5B0BfNlspuC4l4Y3vs93nVMpgNovpl47TtLQ64fj
rmdMAYyEP2P/yKThgl8xzrveC2D51Opt1ypo+H6kwHF4TACeZ4rr1nJomD8m
3HqZKoQrCvoWvJ80DBwnb1m1WAi1WQWlUTRl1PtjtolhJoTRhbp6GkbKODgZ
aHNwuxCMIjfM1Dgp49PpDCtpfyHMp9W5hocq47FZ+vr8k0KgFNoV6VxURmPx
EfONl4UwZseU5BYo45iEjmnPPSH0vnf2OtuijC8ldxnHvxQCK5ZTbtavjDHS
CUZa7UIoMVK/nC2jglbkEv2qPiGEbe+jRC5XQTHKuxXuf4RgcLgkeecWFayX
U9AdUxTB97OxkvpBKnhWfsPS9KUiKL5nn0BOVkF7xZDFa9aLILRGdab3gQrK
0W5qd+wQgVSI8cdVjSrYpszQOhIoAm5N/HToRxVMVZ3QoMaKIF+NoVYsqYq7
5+jOLbgqguOH1QyGdVRRTX2Pqv1DEdi82m+32lYVBRpnaZ8IEdBUC73D/VTx
f6mkScQ=
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwB4QUe+iFib1JlAgAAAF0AAAACAAAAPDECZZmZub/cmI6QwvYDvchE7TWv
F7i/7t8jOmKfAr1UWNgGxZW2v62nB2XTBQG9jFsp65TEtb8OrVjBzRIAvcRe
es9k87S/AMojLPAp/rw0ZRyYBFGzv/ro6xqiCvq8smY/ZLdDsL8wG46kzlny
vE6bF+pxCK+/NooRfACS8Lw4abALdYmtv3NRLt/xuO28IjdJLXgKrL8cf4sG
FnnqvAsF4k57i6q/tCmCoW9q57zYxTFoCOyovxrLE3RGV+S8poaBgZVMp7+t
viBJJorhvHRH0ZoiraW/wKP+5tgP3rxCCCG0rw2kvxYshvThqNm8XkPgavaJ
or8io8fQMyDWvHt+nyE9BqG/jpM/4Zoo07wwc72wBwWfvwB/QxyPw9C8aek7
HpX9m7/8Bz8tHuLNvCqvCjQPyZu/RPUacHetzbzqdNlJiZSbv7wH7IEles28
agB3dX0rm7/EijiTfhfNvGoXssxlWZq/UGFKfxlizLxqRSh7NrWYv7ghjuGO
Nsu8a6EU2Ndslb/4/ttjoNjJvNuy2iM1uI2/gFNXxKbXyrw6jMZzCNSAvyrI
0e6qINC8wCyTHd5+X7+AIsJoF7rUvOYjzvSgmlA/xpS73Ipr17wj3csBCC1w
PwBVkRx5aNq8u0J+xeMchD9o4A02eo3gvECh7sjroYo/Nd7IHJiF4rzjfy/m
eZOQP2ERGpapkOS8aN6f6YEYlz+ayzoADcXovH5kgoJioqE/9e0d/PA68LzM
BE3SH56kP+aj1jbO8PG8G6UXIt2Zpz90tPAhNHfzvKJfdIKG1qo/PiypC+Td
9LwoGtHiLxOuPyJbXh8s+fW8CHAnBDOMsD9m3IZAIrr2vPxS5hbODrI/Zted
TnU297x8kr6f5huyP/Du46p/Ofe8/dGWKP8osj8+WHDQdjz3vP5QRzowQ7I/
O/DIpytC97wAT6hdkneyP451g++wTPe8BEtqpFbgsj/gYjTPNV73vAxD7jHf
sbM/C50ObJNz97wdM/ZM8FS1P4l8l0mYa/e853j3C7+LuD8m7Orr2L32vBPK
GZAai7s/SBCK4MWr9bzF/3NaPiu9Pzv9EzJaC/W8dzXOJGLLvj98Cax99XT0
vFKLNXaF174/T8S2sttw9Lwu4ZzHqOO+P9s2fwXHbPS85Ixrau/7vj+UTshU
rWT0vFDkCLB8LL8/pY2LurpU9Lwok0M7l42/P6ReWoHpNfS8bXjcKOYnwD8k
500vGf3zvB/WUT8b6sA/0h2YzoKi87yfnoV0+47CP7vXhcm4ZPO89Bky7jEs
xD+guL+Pvf3zvHeaUFzw7MQ/KL7nLkCR9Lz6Gm/Krq3FP6Lsct9SU/W8CyKy
PKh+xj/SZk+6jFb2vBwp9a6hT8c/uNipMfiG97wGc4BSvhLIP/3DRsXbxfi8
77wL9trVyD8GLYnVvh/6vJcDm4FqVMo/DPd9srP6/LxbV3MVcPPLPxunuklu
GQC90DDcC7x2zT/49ZemjJEBvWEXjgp+Gs8/RmoE+AQOA71jWNwmS1vQP55A
QNDeXwS97ue5eXob0T9i7POXfHwFvQf+u9Dk69E/0v9TxECZBr34VgZZcq7S
P2WR8Z0Bmge9VAmNAytt0z9r+dJlbJsIvT5COLIePNQ/CV56CzDICb0AviuS
Nf3UPzyA/yQdAAu9UMBDdofO1T8epeezI3wMvXkFpIv8kdY/nS/Wh3oIDr0M
pEDDnFHXPx8ilMe0sQ+9LckB/3ch2D9PsytU49AQvScxC2x249g/I258KtLE
Eb2vHzndr7XZP1vgIhEQ1hK9oWejcBSE2j/Nn7FwLOcTvWzyVTWcRNs/tBeK
PZXnFL3FAy3+XhXcP69JGEHr/RW99ldM+ETY3D9uKk+OCgIXvZIFqBRWl90/
d3eZaVYCGL28OSg1ombeP26zIuPYGxm9vrDwhhEo3z9X9dJzACgavVNr5bwI
lN8/1GuqosbAGr3oJdry///fPxhtpbgwXBu9lhMKFg==
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577277396*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwdV3k01I37FS2WkEiWLNEyVPRaSshT8WYpEZGtLElJtmQJFUJSigipZMuW
FnvEg4xtxjL7zGcivCRpU0rR4tvvd8+555577nmeP+85d61XoN1xQQEBgZ6/
/D/NCbl9ZbqqHQT+H93GKuHfL21+1Q7NGYWKN2IXYVGkw4WTImSQEtnrsnK1
KmpeqI4o0iPDji2FH1r7NuGTWKmQEXcy2OsYnJN/oo96CYH+a66SoSZhcrvV
+G5sSOo74VRHBviiV73sswXCtU1eGaNkiBa7nLjvuy2Sb1xxoy3vgGwlPeW5
Bke0TH/juNygA2q0R2uLo92wP/PfgxbHOkBW2uPozJAnHsop3Bd/vQOsDt1e
7iTjg8S9RXtbGzrA5xajscnqFB7Nd9/1a7wDvg7SGS2SgThW1GxosKITDAMl
R5gBZ/BkqaL+WaNOmP9Uy+lyCMWPD89pP/XphN4gt77nxhEY8oSr8T6tE7xF
EkKPvI3CH1X660jNncBXVk3Myb6I5+vSlb0nO+H0+8dOWeRYFGz8LJcn3QVJ
ISOu858vYVKzjfSgSReMmQYIxpMSUbztkbjcqS6YLPN/MFyYhDfJYsKHbnWB
cXqsRIraVZTr9hVMbe0Cx9M1svsmUvAetesX9V0XxJCtKyOdUlFtYP33Zau7
4bT4QZLhYBqWMC59Nt3TDdf9nXc3n0jHzZzRdxf9u+GUeLjwabFbWEXAxPPs
brBdSCHZNmXi9qF7I9/bu2G13y4b2wvZ2DTyk6/7qRuIE8yfO+1zcPe4MztQ
oQdel0+SDXTuYueb+oGH//bAG42Nzdkaubj/3SrKm6AekNkewDKVzkP6xxCy
+t0emBqNWntSOR8dv9DRvasHqj6vatHdXICD37Qb7nzpAVk1fcVfZoXoMZdS
zVWigFb6Mq8m9yKc+PXukbQlBc45fWF9uvQA/QSsSm3OUuBC2GVKemUxTguV
Fly9T4FJifWWQSMlGLZs6b0uCgXWBfHfO8iV4U9R7yyhWQpUGM2GHnEoxxiJ
F2mwlgpSktW+TlkPcclK1WtR+6kwL24tlfShApNXXUisD6eCYaODpYzZY1wh
PxgzU0CFOJ+jsXk5T/DWGsMo7X4qeFypdsuMeIoKqtmhfnNUiBmujxhUr8Q8
9dnAknW9UKTflKE2UInrNh46NWbTCxtt1X+RkqqwXLPKWyWqF2IP2Q+p76lG
ba0V7q7FvcBxuoTKv6qx5p8A5yx6L2w+Un1fvq4GDfV77Zm/eiHRcyxGJqgW
0UDzgCSpD3jHpb0kNevQzDjJYp99H5ST/khbfqzDHpjYc/lCH6whTUkF1NTj
AVOzne1lfXB9I0cyPfIZsvYWbF9g9cHijS/En+1qQGcrAR0jgX4I3fBYbGhp
I76yPro5fFM/TKzPERHsa0Tvg00bqh374VJywGnW7ec4eUhh7afYflBdLiJ2
x7cJA5wiFDc96ofOlMIyzx3NOOPKWXWC1w++kiYWJBHECHe9FYVCAyCWxpv4
yEP843VTdFhrACpXhiTUlrZgnM/0YkWXAWh5OuP6ZWcrCp86sOCYMABSLm+f
e5e1Yop/xdzNpwPgKTSsyJVpw5XBol/7X/69r2BFWca04X5DvfAEIRosdqS8
fP6uDSWMj51Vl6fBwYUWI63DL5C+82ZwmxYNLA1NHki1v8AMaAtwN6OB5GB0
HGtrOzrunvb77UyDgfPP3bNy21HeVMX3TiANMlTmjV2Wk3HQ7IDPjgQaOLcZ
KChFkjF37/lj3BwayB8L/z78hoyeFhUeoU9pMLy4jlXg0IHqVi+PSHfS4JRq
bbAluQMn9om6Vr6kwX+bJkLW6nZiqfUOJ5vPNHDYvjpsLr8T/WxOOnxYSof+
PRYR9BVdqHUwy+7qGjrsPXAusuxiF07bddpo6NChwbk8OvZjF1Yf+ra/y5wO
HcteJ+8/0o1hjuusjh+hg7awmuKi3m40cLI3FwqhQ4aw+8Nawx786Rxnlp9E
hz/Cd41OlfUgulbuhlw6+IgQVGU5CsYcGTEZqqZDr4isGzORgqbuksZRPXTY
Jmr//vI3Ci71NNkhP0yHqsmG79nHqNjt5b+t/isdUudrSAl0KiZ739V1EGXA
48L8ZlfoRWsf6tYZFQa4VOxhJFb04oqT81vS9BkgXDs2USnfhwxfjU3a+/7m
+S3qVxL7MNPPidTnwYD45Ns9Q1/60Mn/8nq/MAZMBjXtl3DvR4XAOjWRawzw
kBPOuU/px6Gg1yol+QyYfb0qJ1p/APPOyCj9W88APtls0ea8AfQ6a6ow1suA
UBPjdfOLabg+7Mzq2P8YkLmeblu3g4aT4fkyKj8YkCalkLLgT8PyczSpZnEm
2N5OkpzJp6F/1IKEqzoTViXKvRph03Drea3lcwZM0K9nKFCF6fjlwhGRrANM
sJu8drjWiI61MdeW6nsz4Yy8ecb9ADqGxz0XYp5jQvR7+3qtPDoaxk8JBN9g
QqSybnEFnY6/EuT/SDxgQqjtyluaQgxsuWzxs6KRCSFxny+V6jEw7kr4Dysa
E+wbROPivRlodrX42+RrJogkM565ZDBwWQr7S+JPJrS55HzaSmYg5fri6XVS
LNCw2LPRe4aB11J1P7zYwILT9x+Tk9Yy0eam15SHMQsqZxW8HtkwcWVG2ps/
B1kwa315gX6eiaxbreN3T7DAUETiTE05EzOzPo0anmfB8vNzBgpcJjrfVh7m
3WTB8PT4wkUhFq65Yz0YVsoC7puZqmPaLHx1N5qQQRbkNCok/3ZmYX7uQ04V
kwXuKbs9s+JZ6J3HZ9q+ZcE6j5MG/zxh4YYCEfrHPyyg1QzLmPJY+LbQoP+a
DBtcT7ByxwXYWPHgBFVTkw2v5XtIiRpsDCjJ7O4GNmwuqLsvZcfGf8o6Onwc
2FBRtKDqGMHGmfKvLxb7sUGzxKIgJ5eNdRXqrQUxbCgvS1MfJrMx4rFd865M
NpAq+EXq79ho9DS28dVDNmjRVr37T5KDfyqf1ke3sUHDV5blrMvB1urhGgUu
G9QEVzfTHDl4qVai6tl7NijfWV1sHsnBvfU7nzgKckBeT+4G3uOgcMPpiq+r
OWBuxZMlkIPUxjtlN7dwoJHZu3BxmIPXmyjFW005f/u8bXKDABdtca6w34kD
uRO19D5VLkq3kvJPB3BA8NUkygAX2W2Hc0XjOTBR0h0+58bF7PbEO6W3OUAN
Lt36KpKLLh212XufcOCJUdLbF9lcVOoavzVO5sDdobt15jVcHOmWTo/jc8C4
9HmcwQAXCyh7UlWnOcA/wz+gMcXF473BKbiEC1E75xQUlvCQ1J+X7KbIhfJ3
F5/NKvFwamDg8vxWLhRopo3N6vPwEf1PfPZeLtzxLZD4bs3DIOaWuG1uXKhW
3PCl+TgPddhuF1nBXLBwXvp1PJKH3zhXo89c5sKrzIlvYqk8rOc1nltxjwsh
rM7vOg94GMl/G/a4igudn5p/H33GQ+NBubP7u7lwzW3EarqHhwtD5sFTQ1yw
6xHMjn3JwxfDYQFJM1yQ27b+9coPPIwffeC3QYQHrwrMdYr+8NB8jHWSrMyD
W2ob9QrFCRR9LeTjpccDOdnUOJ48gb0TOscErHiQIzJHE99A4I1JT49cdx4o
//ZUMdUh0G4q9YhxKA/ypin+ESYEyrxvceEn80B9XLfpkRWB3A8fD0fk8aCY
e1d0zJHA25+UHGTreBDAUk1J8yDQ7fN+uxoqD96d0nmg7UOg8kyUjd0oD3wX
mTX3+RE4+rV8//QsDyayHNh+wQQWzRKW15cT4K114oNIOIE+P4TNN6sRMEKO
WFIaTaDG/HYzynYCjromK+2NI/D9T5/dJ60J2DRVGuqcQODj37dMlh4jwGNd
YklePIHBC2SjoggCMo8eI95cIlB30VeDPdcJ6M3eJab9188Kqm8bKSRgEVNp
Z9jffw2L7XQvNBCwXfxnQHMsgVFLY7euGSBgvNK9NeI8gSbCT7c0jhMQ2+O2
ihpGoIDosKbTPAEqo86nlIIIbBeTIM1K8qH5h2NLoC+BieI712es54PrikMy
L7wItJA8raZjxIcfGw/6yrgRKCZ1R4Vmy4ev1SmCgTYE9q+krAnw4QPZrdgo
Yg+BqTJz8suj+ZC+pOVsrD6B9rKk1eVpfPB6zH2UTCJwldxhGYsSPvxzeHoi
XZFAnnyi1EQT/+/+EFG9J0Hg/wDH25lI
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwd0Hkw3GcYB/CNq2pFGWeWEDkaqURJs2k05iWYiZkkjSvIRHMI4qytqCsd
IYdMohRb7JI6QnN0xlLqKn2ykWg3u4MVwVpr/ZYQG62oCKJIf8/+8ZvffOZ5
nvf7vK99WIJ/hBaDwThGf/h3c9GK4PPbHjIYvrEBZWoiu3nT9FYu2sPWsVhN
vh037kzPQjPMtQvURMC1swuNRmd2N2arid2i27CtK1oYa5WoJlrtKcdqZK14
3lezPmoi8v6HXWeJzrfrXpwmgSEyva6iZtrTnKCAabIvwoan49dI24FbsDBF
GiLdw1u86mm38ot+nSRM3fEvL+X8QntOtj/tBfHUt/+tbmMNbV6fk+MEiVYf
tC1aK8O8wNUlFRlpkG9jt+bi/lJmPUWEu7mblRlnaEvfHZlSknbPjK4Jm2vu
dL3MqVJBopQV6iyrEtq+Fa/2yklG+JUrYXeqaFfe918eItY/W24d5d+jfVYo
6RsgDqy+8U9NBeiQmOx+suo/ZdFj1IDObo7tI5s/Wzw6F9hEmyE2D+0hL1OX
mA9zWjFvS5GBmJiKN+Wzctppbyk+bPEnSWH3bA+TAG1K1Us9InaDfu7Wr4S0
hcxRww5SUX496b+8TpwvTRltJAub9s667H5CO1Pyxfo9ssJKEAtquzBv53eu
XGKz662g6vhf6NmTpdnwuoO5KB8QYf/r6JJqKNEuy4oJFGM95OmlejgVfNGc
80aCeSGHuC0gdVYwO5K7Ma99gwHAOcs8gwxWL8437+J0wvkQxcdHTklx36vJ
TV0w+7ItLd26D+t+AwIRfLDeLn0xg66cMu6XwHKQ3slEwTN8nycVtT0Q+GGu
tmN8P+bHxTRKgXgeaLB1e057Lsxg2zNggGMhew2dz9Pj9IOv0Cv5Rs8AbWN9
o57nkKZbk7NaMEi7PphvMAiGNR6Pb/sNYf7Coc+HYM/TDe9T7GWYv3Q9UQY7
XZhxyRNoj5zv84ahzs51tK5pGM8TObXIoepCNcfsmhzvw2L1jkDc/An2be8R
2hwHllgBXdp71k+bK/A8Z3bvKCwGH132lqHzl7mtSijUvW8WVDKK88DnjkGH
qwP7TqQS61HbD1IA9XPZJg5j+L5rnRUUFAZVenzjiPZdS62i4MLq8RWpE1rE
d6qmwNinLj6fjfZ5wLtLwfmx+MCPvNDU1qhaCvSNZuw3nkbXX174nYKA2MkO
/R/RZxWdAxQ4mBQlR5WgD6TEDVGw2uztLCpFTwvMhym4q1VTfaNKs89CpIKC
ZX7YLb06Tb9cZ4KCctFYsI5Y0890mqMg8esfTMK70a0X+/6l4LCZu+SxVLNf
atIbCubOlJOrQ5r9gtsWKfBaCt2hNYmO4pA1Cqx+Mhw7N41OBeU6BX97dvAe
zaBDHmQwVFCcZ22YNa/pP/GHtgpi9km6qLfofItQXRW4y9Mve7zTzCet6KnA
LPMT18pVtEcCT18F0zvk8+/fa/bT22+ggv8B5bI8Ig==
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.60900357728508*^9}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJwVlVc8Ff4DhpUiowgtZCRFAyGJ8trOOYgkobJJ9uZkhHaKhqKkJEVbFFH5
yt7Ocg7Kip9KkVRKiX//i/fz3D03z8Wr6BFs5z2Xj4+v8d/+z6vhV06NF1Wj
8uZk6Zq3Xyrko38e2dBbjerepUp+mwxJ3qHdCb5CNZh41OrZr2xD1iUUx+Rp
16ACxnbrF+4hj5MWh/e71iC8MW3fTnsXon0sOFA2pQZzjfgwSvcgZSdbDziW
1ICa/bz9SaM3wZn1HukDNUj/Pvuk5j9fUpN2ah9DtBa24dKuIRX+hHrxvYOo
bi1EJ7RFZTOCSNtls50Uz1r0q5Tdjj0fQuyv3rI8mlqLefysn7+fh5Ku7Dnm
lWW1UOoZoR7qDyMuN10Np4dqoSoblCY2Gk4G817p6YrX4VVPZ2p+fQTxLZDZ
HKFfB9sbJqnIjSRj9+nqhT51+Oj26CwvLoqEP+apfj5fh4TQm2YdktHkV9Hm
1Sqv6mAvnEXG7kaT+JKLcl4f6hBq5uu0ZUMMmVv+dXmOZD0+ctfqWqbGkJOv
bCTfGtRDRf1FSMKnGLLw9cOFy/3qYawvKc2/mk4u1IgssL9UD/svCeMzznSy
vOHg3HOV9ciJun1xYRidZDfXTzd/qseM4f4Zt+N0sqpd+afgsgYsnZ6JfJpM
J/msI19NjBtg9Wz35mE6nWzgDnw6HNiA9CjoybnTSVEXhl9kNuCwxDqquhGd
bOnJ7v9Z3YBJxvZr08vo5GX/n26tLw14np1imD0cQ4yGnDqCpRshyLtyfbgw
htS9L22/b9aIyP0uceLhMcTq05Km9yGNCFn2rCBVK4Ywx8JrlK41IrFGvLxz
NJo4TDArXOsbseIc9wPyo8nbH+plWRONOL5H6u6ffdHEbepsMW9lE2YPCEqa
SUST4elPDyWpTZieWvX4Ym0U8eejFdhENGFrmJoRIzqKjPMX5KbcaMLfttOO
o6pRJEpQILu+qQkCn20MHr+JJH+EvTL4J5tg1KHt53s2kiQuqjoPxWYQSfvn
6xFJ5ksonIm1akaZWHPs1q8R5PSShOOl0c2wW743nXIrgoiveJv4LbcZIwqf
HuzZHUEuyerFqrc146hqbK2PYASRVsiM9J9qhpymSG9kWTjJUZoMzl/dghK9
rMmj/uFk9Vp7v0GbFhzTUN6sIBdO7q0r8pKPbcGPpXbqtYwwoq4m7rr3Tgt8
/iao+h0JI083BTllMFvQNXhfSUwnjOhtbtnFnm4Btalz5dMPoaRCd90OMZVW
vCycv9wpK5SYbjtJsdzVitOZU3wZO0JJI4aNTyS0op91NO3rnFCyw8R0e/Xd
VugsFJezehZCOOa5W2Y5rUixyHpwxzeEONH4NPX52jCQtEZ/jmwI6bV22RC9
vg1BMZ4XS68HE6+dL9cUO7RhQlGCdkYgmHywl1b8ktSG4IGsbf1BQSTIMUZm
/cM2DOUoq2vzAsm3vdwlBzrb4OL2WPEkAkmMq7b4Lf528OS3Sr3NDyAzHheE
+9TaYd1XJaAhHkCSfcbnyTi3Q57M9XWh+5MFfjtmHY61483JgbhDg37kbOCD
qQuF7bhqV3n+srUfkQgV/t72ph3OsjfuFJUeJFZ62tHH+BlYOhz/ok3xIFm0
zTNCaQUD3Y/3MUZSfAlz+4XQ12oMCDqulfSaPEDS8TrI1ZQBFhzTfD0OEAej
cf+/TgzkrT0lEtjmQ1aYyB/MCmYgWKz8RKieD3lrusNn6zEG9H6O8Efd8SbX
zeM9eVcZEO2TSTwk4U3cKQ/cIgsZ4NVZTSckeBEl2pv9knUMyEfN8Kt+9iTD
lsJ7n7xhID5oJEbN2ZMUWG91tPnKwDsf7qhWgwfxt/HdPSrAhKFrlcdWHQ+i
tjPDLkWWiRt7HvEM8tzJuF2djaomE/y2V61MJdxJsf0Pq3oLJiKXqrwRSXIj
UQ6rad77mRjlqo9Q3rkSXcddFvzhTPxNFJM7VOVC/jglm948yQTf+i877+fu
JxV7nxjhOhPzOtqOvU3eRxL39xv0FDMhdfhR2ULPvcTEVWxbbCMTy1RTRw1M
nImAu8HWFX1MJD5YdKBX2Yk0eATqlH5noknaSl5YyJGc9rqmtVuYhcId7Dm+
nx2ItU+zxjd5FtK5a+fbM3cTcd/fG89vZiHGJW6BYYk9YR1UXa9uyYLPq88r
GrN2kcv+jiqtbiy4ZV5pMk+2I46BJ5T9o/7Vudbdz3dwJ5EOLlkldIaFuOOB
JpW2tqQn5D/5/JssLHIcGdwUvoPkhEmtNCtlIfOg3ZEQMyviEWEiPdjCgnEg
3cxDmkaUo8KWJb1jIfHuERGTcQvyIfqmlPwvFnoZJ8bGG8zIPTpj8auFbJxk
tt5/dsuEBMbOLtqrxEa77hNWa4IR0YhXE53SZUOgcTY4kmlAJhL2C2XsYOOG
QraezW098izxjMBmLzYEY/Tmq9J1SHTyC342nY0rck5btC5pEr2jI3yhaWys
u/yyOvfgRjJ9bMXMotts0L/ULe8rUCbkBOXPg3I2es7lvtFhyJDkU9G/aAw2
LhyinOsTFiWmKXd+fPiPjcpBsXJ/tcIKwbMdE8f/sHE1Pp/zS1AETanzxlcv
5oA1xol3uSiNM+e0RqvWcCAkolPwRk8JNhc8Rty2cTB+PWnxgg2qkEg//35m
Jwc8zdZD2ivVwblUOXTtAAdKZXXG6zZp4nLGlwG9eA70eBoWIUXacLoi19d5
gYOgH1ctS7S2QDbL+m1UAQdzAz75HLu0Fb3X4rqkKjgY07rjfDpfHzev3+cW
sTn4/sdtR1rZdnjldLNtP3IwVS1jnN4MrMkVYo7NcOCM8vd3aw3x8ZZu2xmp
DniVhy2rvGKEB7cPNK9b14HgzestuIHGCMq/3NCADqgfcxPnNzTBpru1tT67
O5ArOmld3GeCb/e+V83z74BYekqK52FTlDxQqsxN7ECyjGKjpLwZYh7ZvTK8
3IEvuSUCNRVm0C9MKu+934HFQUMUEVNzzDwpLI173YHLUg1M4WJzVBb3PZXm
dWDpi/vOwqsscOTZoqLnnzuQ5Z42KHTeAual2x87zOVCcUF4gBAfBQvKAh58
X8ZFTLWi2IANBc3lWXcvbOSio+doX9UVClJfNt3RMOFC89f7x3mDFNhWTN1q
c+QiRcIy8fhGKiQrVW4GBHERMZF/ud2Vio7Xe64LH+Ui89zABCWViszq41kF
V7ioUJOxqXpJhXPts0zzx1wMtNjf1/9Excr6oUtDNVywTtc6DAvS0N8geTG5
mwvZ62Vr9RVoyG0yPqcwzoX3k4e/0nRp8G4JPVsxn4dHNTcbh2xpUGnLOb1P
hgez5PTIqP00jLS3n/itwYPAWUWmijcND5kzRzPNeajLeLThTQANIeyNyTr7
eEgq5ffLCKdBs2PfYU4oDwplVs9Fg2n4wU2JCzvBQ2X5JYFkPxpKO8vp4tk8
uLzstf/5z3eo+2PUoyIelN0FLZT20rDt7fIIqwYe5l9NDd5iScNsj0XoSA8P
Q6wlmZb6NFT1RQWd/MZDtUh2pet6Go4O3PZfI9SJW6arP4bL0GAxyPGtkesE
jW3ovUCABuH/+H08tDtx9/1Y2Z0RKlqGNT35aJ0Qmr62yKydirQP7m7XXTvh
K27pOVhMhd3Iuf3bIjvRsHqqNCmTCqnPxLn7dCdUtuaLKsRTwRsd2xOT04kT
1rvdK9ypuPJl5e6lJZ3YXn02V8aEin1freyeNnei16CAs02eCrlvsTZ2A51I
LK8ScPlDwcD3e1bjk51YpdOje5hHQd5kFzVVtAtVT3765RRT4PNrgcWGVV3w
2iiR/TqNAtXfW0ybtnRB4O6G9nf+FHz+42Pka92FUxZlW9TMKXj095KBgGcX
FPSzGS9WUhA6W6OfF9OFErWkg9QfFtCa813XOLUL1qu85/JaLDA5V0mn/1YX
3i2hZnnlWaBsnp1WQlkX6EIbtSdiLRArkKQh296F8aJTJ+TsLGCwoHBj+VAX
7ANM65zXWoBPuG+d4+8uPFeenZcxbf6vwyKVSbFuyPaVmbCZ5ji+cLtyunI3
DmdGJIvlm4MiFrBKU78bQzvVX1vGmUNkcZY8w7YbzQ5WRgG25miTaJIN8ukG
46V5Xvxqc5yTmlohGtcN7iojwbRfZti1VGXZvfPd//5f3y+nxQxLlu+RouR3
493Y5tYnOWboXHF88fDLbgzba2hUR5jhf/RLJaw=
     "]]}, {{}, {}, 
    {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwVl3c81f8Xx5EkK0USIntFxtesnGtzKYoKFSkio6y4JCTZSRJStjKzstfb
du3tXpeSssoICYn8Pr9/7n08H+fzfp3xPufzeb/5b92/ZEtDRUV1Bvv5/7/J
tR/eabVvUCzvb/0QVzbcD48x/bDYN4hnO+UO+3U2nAOV14NHkm9QLV5464oQ
xsdKum3NE9HUoIVXdvkRnIO22EPFsgR0cSRRy/jrYZxjGjuZ5PQK/dySD7lm
yoo7Zfdt6aLyK3Tmxy++5LOsuMVTJfu6971Cm+pXG6mFWXFOlUanGxJj0TmW
NtKVxUM4p77w4GziS8RYXMl94D+Md6kUvIVi0DctsrVGHzNuvIQiqFD5DKWZ
dYd/kmPEvT9sUc928RkikM8bVjMy4lxcxszWvkciTa6Hfd3TDDg6afKzQu5I
lGcjtPsingEnlzOyKe4fjgr/7Km82juIC0/p7+LVCUF9DuwhGmP0ONXINnf6
4QB0U3P0l00xHW7/gjbLnFMAuvc4Usgzmg7Xr9+a3bo/AD0I/DxQep8O180S
WrP/vh/6PpNZWCVNhxPc/+T5tsJDJFIoMEsp2I8bXCUoTTd7IBXJjCLdClpc
w6mXJz77WSGVpQPl5+ZocOXHnE/pPLqO9JZY8u720ODyaHTPFDw0R+ZXi7kq
PtLg4sjbZn4EE7SR5NpUFkCDKz0cftGHeA6d7UjNO8dDg5sV7F1PTTSGjN5T
uqbm1DjBT13U9FIuYB9RZsM2sgd3bh3957zkAvunSAKnc/Yge85ye+iDKxxP
y+AKerQH0muraynS7uAyy5hAFtkD5QOc00oynjD+9Og+Id9/YChr02Yn7wuc
D8t8D8juQo2GX+s3niAofPNSXbxpGzL1yrT/exoEzxLWaVpfb0PkhcXWoKUg
mD8dopjoug3XLSzahOufwg9mt+qf/Nvwz1Wx3c4qBDjVPSrUnv4BXNoycSEt
HJjSo2bFr2zBN//Ts94vo8GFwOX6H98GkGkMRNLbo8HxoMis8+5v6H56507n
32h4EaJYSxr/DaURSbNcNi/gpNKnx2de/4ageMa5mv9i4K3HoOZZjt8gUjg3
tzvyEhIp3zV/cK6D/eeU74854+G8W88THViDI27MG3L68fDP5pbRitAa1O5/
SDPtHQ+uxxsT6hjW4LDUFW6d8XhQtmRcbhxdheqHTOcZkhPg1lxcoZPLKjAf
9y6KEUyEjH1N+YK5K1BicskrQzoJ/N7zWZAcl+H6HHpiapUELoHNrtawDAce
SkXvj06CA8zrc6JsmD2dPsduNQmqQ3wr7GuWYP9qPUWyNBnOnTzqXMyyBKfa
j/JReFJhuuRRHU/DAvjZBAbeSk+D537fPCwMv0NAFZUzrjoNskL04a3od3jC
4n+VdxCz8+iZHdr3HUIrH56iUKfDU/YQn9DqeYhhejB60Todlr9pFiHJeXhX
aiehfjIDgifTrjMdm4Nu2vODfMmZQNzZaX98aAZ6zbtqd8syoW4tkst7ZRoG
CvSzxnsyIaRo1ClxYBpGzXR843czIe+KjIpF7DR8yQeRQzfewSv2yjdE7mlY
N5Xz+cf9Hhp/7ZTKyX0D7nfHBD69zoLch635lIdTsBLO5dz0MQsmjH76eFpN
QYvLicqsniwYvy5vdlZzCpzOCl5wo86GOOkaU23GKagdkvY5cDcbLvz6uamd
9AUsaXQGZZVzwHuB9mfKi0lIt/IIDB7NhUN54fnM3hPgqe3V47iSC7G1++xX
9CcAL+nDeZEhDzLNi/KPc0/Arw3/Am61PNiNvaelVj8OWlERlKJ3eSAgdnO5
5cA4zNSmy4175INJLde0e9YYiHENfD3NVgAER+3z/RwkuEq/+9JcsgB+V7d0
2a2NQvCGmPYTzQIYu+5ZL9c7CjODAVmj7gWQznRyxTp4FNIjZJweDRdAGUVR
mPfPCPDsPv/d+aoQwpwd14bmhoHeRZRWPrII9ObOfPGcH4STdnUTuglFcP/Z
gvhexyAoWZqUXc8sgp3dLJqPeYNwx9D/TnBtEVC0RL3f3h+EVjEScWwR49oQ
WZc/AxA4Ffws4HwxfHtWQPjOPgA7l2Y5ellKoLv9P/ULQ73gG1OfMstdAikB
dcvib3thdyBObE+sBPp66/mu2/bCP2NdVRnNEhD6PcPetNUDVEbZN2K8SkC5
jLYwWLAHaA0cMq98KYEW1snlkNAuYNJclp0s/ghMByTplJ4RITKwrXqz/iM4
pWb0/LUiAnNTsiZr90cgR555Qy9PBBZ1o8vqsx/BmfdM+tZYO7BCESGDqxR0
KltWRSTbgf2MG7J7Ugq+FFHa25RWOCG/YbhiWgb3b1ofy7nbDP8pr4V0WZcB
xcKa1Vy7GQzPLTe9v1cGke8KazX4m8FHd1b5RmgZrPj2TTaONcHotVGhzpoy
SE55fO7O+SaIDirfyRAoh73DXIpU0Ag0o575V1fKYSS49eyHmHo4Pu42J7db
Dsc/1D3TvloPMl/uCbAwVID5satr53jqwfLHnYQWwQogqQc3GWbVQc2/K0Gy
VyvgeZec2lBjLXiIKl1nrK8AZ5szbEz0NTBH2GREEZWgfPBof9xIBZyiofep
ja+EYF3TvXvZFeASwTlflVEJkV0Z7yMfVsB2kkpLaU0l5LKd+BQnUAFMzQ99
cxcqwfODXeCEeznIMVMtvTKogr4LsgfHBcrgURp9rxNjNYSwz12SKSqBJonj
Zx2OVcPg4gU9uogSoCsVz7UTrIYBvro4jjslEN2GD751phpUHDy2pnlKIH0h
Us3MsRr23eP+e/pZMRAVDhdqdlUDh6t0qQqhCNg6j0dzRdQAwV+Dl3kxHxre
OBVwJ9TAQ4WOjL2cfLjnjLp53tXA1THiaVv7fOhktT3Ih2pgRWHldfBsHgRc
LQoU/FUDW6dOvjs0nwuL0zoPTl2rBU7Pkv/e7WVD6567hZpkHdg6XlKx8X0H
bgNtBFDGuMp02l33HZzMOB6P066Dgb5K069H3oGvDhrSsKqDZtcG5bHcTJB7
xnBe92Ud7OMe4eebzIBkrjQw/lsHOyuXmqPM0sFLoVfoVlc9DF441vuYIwUu
RSh4PiXVA8sNxNrXngzSU2/bs7/VAxpzOpTpnQzTkY4OP//Ww/2+Vv6vn5PA
eJq+yPcUgid6x3YSCt+C2EvNM/HPEGzd/rurezcRnAkTYrOiDaAteGP0pXIc
WAhGD2xKNYAVo9qU/Z9XoNer6XPwvwYQEj/1tqD6FQgJ5XWdwjXAJfvGgDC1
V0Dp877nbtYAm80nehwMYkFH9FgpVVgD3ChUfmPoHQN8oxeB+0cDiNrejAjW
iAL1dyINBSsNkJCS+ObFyDO47fEXp7HZAD5tHoled59B1pF3GndpGyF/Ta65
92UknDba0q7gbQSBmcz+wLVwAGKyoYlJI9Ql2/MOjIaAdbx7z6x5I1jstYXN
eobAkzt6F3xuNoI57cqFxmMh0E67ZpTm3Ajj3TrtjdeCwUhd2+RnSCNYfman
6loMAqvqBfOIWkz/Qabmd9lAeBzWQOFtboQNHtOI+k+PIcPs1bWSjkZwUnwa
ph3+GOY21G6MjTbCwXMEKpuZALgvH3NTdLURbnOsKD/V9Qf/fGW7ZuEmmL5Y
lcMe4AMpyU89/kY1gYn3IIf7Z1eINHa64PKqCfwsNwISb7qCD42J2MybJohK
CRsc/eYCpndOTvRmNwH/MYYW5vH7wCBdo5ne1ARUU9vhQtxO4FG3ckR/ownU
F97Txe/awK37pMW6Hey9EOLwmixgA0b89W1y+5qB64v2MSb8bZB4GuHDw9oM
6YPT0WeSrWHSUOTrT/Fm4IiI92qsvg74iWvFcTew904iD/uinTEoRWlEMNo0
w83QUjf8+HkQwonbBjg0w2IcgbVqCQ97GRucDl7NYDwiRH9NVBtKHV8EnHvR
DHp8ffeIZHng+9tmNN2C2U06GS+8VkTrx+WWZU+1QIOkJGNSpBnaYs6YUpJr
geh1RvPk5+Zoh5p95JxyCzAJWBVKR1sg2h+/a/S1WuDt9noaU/h1dLS6Ksz6
egsULaZ1xMncRIoW6sIvIjGW5zNQ7r+NVC+UcMbHtIAvf+TcCbBBahqCTEkJ
LcB5kovzR74N0pHY/ys7swV4TH4nnHtqi65sExsaaltAZKTxDK24HfJKNL6+
stgCNnbufqlqDsg3qtFoY60F/Jq3otrfOqCAQDnNna0WUN1hjln944BCHdgl
6Pe3QuZmkfTlYkeUoEre5DvRCi4F2/fD2J1RJcXqpdH5Vvgy+DyJreA+qu3t
D75s0goWj2NkTu/eRw1N6j7XzFvB8fLtno/CLoiYK2htZ9sKW8+FoxLdXNCY
z5y0/6NWyAHeMsUDrmib635nwYdWOBvUcdGYxw3JyVPHKZa2AsEv5u4ncEOO
Bi+t66tboVraanXtlhuaeFix1dPeCmVLOd+qs9xQ/cSeyNJUK8xJ5O4nSbqj
wOToJ5IcbfDPt/osNZ8Hqi4XMPrI0wZvFfsTH53xQL96S7nOCLbBDcb8w9FX
PZDNHrkYL9MGbhrhQT5RHkjnJv+Xu/g2uHCNZvDhpgdiFCg5m+3XBuILYx6f
yx8gLVUtepmnbTDcI5fE1fMA+V4aHaqIaIMkWynFP18foOXAbYf2hDbYTPqU
mcrsifq/abyeLWkDLt/HyfmWnoh+Z9jmXlUb0G3WP2J180Tq7HYyG6gNaqlz
g3ieeqISrYj2/T1tYHGavu90rieKfTf0W2iuDW5lCD26suKJuutsG/OX2sAp
/WgHC7UX2j+6GfnfehvwHA/K9TjshTzpeIS0qNshZq21z0DWC5nZ2Vy6zY19
x8/XD6s4e6Fo/40TC/ztUKqsut/1oRfqiA/97ibWDtIWYr8swryQKjE/IFCh
HfteQ4h+phfiEf9dkGbUDsRltdH0US/k+ORwbPXlduA54rRSNeWFqj9JeQ9d
a4fhj42LLxa9kHnMHc399u3wPqfCJ5iagOL+kkj2Ae2gnFOr/1yMgGYvr9c+
Dm6HfiE7crUsASkUsaYnRraDDuUFW54qAQ3b6Dt1J7TDdGPunXEDAjrcW00l
U9wO3UeRaqgjAd0UI83oVbTDWtClpRk3AioK/NVpXdcOWosP5hl9COiC0qlX
LzvaIW5I0LskhICSX+j55Pe1AwfD5SX5KAJaWrCxah1pB0rsLTv/WAKKTE0S
35zC8k+fFfBMJaDx7SoW1vl2UKUknBN4T0ASl0d/iS23Q2Z5GmtiHgF1HDxU
b7HdDvQiE+HLZQTEaSOZ4U6FnZvq/u3vriYg+3rd0Eg6IgSPm095IgKicw+4
VH+ECMYH3cwViQR0ueetEomTCL1cqy0G3QSUKVrFs8JLBHyYlLRMPwFpTqzO
8ksSweenbbQdiYBiFFm6VWWJELh9xKSGQkBfoyWKTZSIYGn89f3kJwIK0L79
8KkmEUyrXKLefCOgvhT/m8n6RKB1WJqVnyUg3u032hVGmD9LOovkeQK6Z1op
0X+ZCPb+sXrjPwiormD40PdrRLjjRzqysEhATAdX16lvYfmUunP2LhPQ9dvM
FC57IkhvPagMWiGgvDpxJH+PCBwPTS8eWiOg7WM6mYYeRGBPWsTd+0VA+m63
wmx9iMDbGjKdtk5ACd1+9/wCiLCsQErI/U1A8yJvTOKDiZD5dacqdIOAlB5X
KBdFEiFbPSDj7CYBBY8PneiIIQIDn1VRG8ajCis0XxOI8M/pr6roFgEJRzPN
bycT4Qr76SRLjD1+iPWwvSPCbNM5GWeMW7S0S07lEcGs6pOhCcZsKdbx2sVE
mI5XMjiM8a0/j3wtK4jQJj4dmIXpl5gkWnvVEeHz6RU8B8bUBeU60c1YPhIT
f25g8RnTD0nmdGDx8iXP+GHxp976ydrUR4TROym3vbH8ftYyblBGiNDk0Eg8
j+XPsK3y38g4EVRHlmz3YfURUrJ365siwspg+P5XWP3AI66oY44I66vsGzQ/
CciiuGW5eYkILiKRT88vYfksr52q/4Wd071dqR8sENBzSX7Hyj9EiKroKff+
juX37tFc/v4OcNj3bo97hoA+f80TzmLsgMiIHonqrwT0h49yO+1wB5jpd9Yr
fiEg6UTFL69OdEDDDweDbqx/9Ek2vNGCHWAs/I80g/WXDfvL6+HiHYCL0fj9
eZiAXkf9JPspYOsF82ldewmotOvEMe8zHTDocDSEoYuAeukNL7urd4CPe1V1
UDsB0T7JHrA73wG03boXeRqw/vKy7jS27QCGuOZvk4UEFFr6nN7AsQN0hNze
BGPzk7Fap6PtisUbxC7DmkVAZEeuZpVHmN7+wd3uJKz/bw7VCLzC4vHpcFsP
IyDLJOptnjfY+ktF16uCCIhAOa18LK0DiC1D8rf9CajANLKU8UMHlGqx5t7x
wOZRX/vDeksHRNH5p8nfwOZdtiK5bb0D5OZ127glCIj+/sxEwzbGrqkVhoIE
JJDPxl1D1QlaJ07fvcNDQGYiLvGFTJ2w4yizbspCQE1c4tEJQp0w6942J7Tq
heL3vXnsYNoJoTl++xpLvNCszY/4WYtOYPq8LDGb44UU21QKbll3gpwuDcN6
qhcaDiVTLO51wuLA3FZnlBdiZeH4zyC0E/yGTrQ43fVCoZwvZiVrO4HBu2Wq
gssLeUuFGCwJdsE2Q0Uo231PRIwatb4r0QVaKgpT7bc9EeeKMGFGpgtq79vb
OZl5ovKSlsxP57qAWDrcF6zuidaUaP71XO2CCNsaRMfmiRw0HhUVRHRBUbn4
FauPD9C1q+5HXX51QYb88MmmHx6oYdtQ+9GfLuCJYDGu/OyBRJJFHoTvdYHY
T1/yu0EPtDY9NpzJ2A0sMnMP7ao9ULgbLnZMsBty5YyKQsM8UOUzZjZN024o
lqcRthLxQBwtWawcZd0w94nloPw1d9QvM8FY69kD13G0l3wrXJH1sSgGP64+
kD58wLHhPyd022xCxOBaP7QoLZoy3bNFy3NV3j7cA2DopwoqNlbowL+a/umF
AWhToZgUhJkiB9FPdD+XByA6Re+5i40p6jX+d/bP6gAEDPdIGYApisvA5TBv
DQBtSFSs/m8TJKLf+liRdhB2HlTud7xlgrRie+VCeQYh+6cgI079EgqQmIqV
PD8IG0dKLkkcNkZbV+jM3QoGoTLF9tzimi5qci0641yMPW+T1dxQposiIi14
7UsHod9Aab6JoIt4mwq+3ageBDOxpVmjPR2kJXX1nn4bZv94tTCCRQc935f9
5OTnQfD1jat9rKCFRIr0C3qZh6BzVUD1xDscMj34bJ+k8xDsVCakLrD+h5TL
dQfvuAxBrWlb3+lMecR9myYt3X0ITiVEGZGV5NHXWi81Lp8hmD7qV3D5phxy
dbnlfTBkCOYv+U7ulsmgKJLSz7nUIUiVT3jZNieBOt59pWQOD8HKlVMrI994
UP6lpJwvpCHoV3Fh+G7NjaL3rhJ4xofgS6TjCZ+p48jMvOdo7NQQnPTPfs82
w4FmmSqNnyxjevlMYUf+sSJaj2dt1vTDQDUny9pE+V2vpqFcwnt2GFxixQ24
AllBirWSWRAwbrTuHak/DDyfle6KagxDUePK8JXtI7DtrXRSRm8YZIZPx+U5
H4XyYsUoddNhaDDrpCvU5gJpfgUHG6dh+OKDe9L1iR/4qOQEct8Og31e/eqN
KQlg6S1+VJAyDFtfXhQmOknCvzeyYyXpwxB67r95jU1JmFCSja7JHoZsvu5v
owxSkHBf5l936TAQLc+Us0ueBtZJacrP7mGwGZYrPZItC1T1kjEKu8NA6Jvg
0YpXgIO8tWM+VCPw1tbN4BdZAY74GfI37BuBhPAuG2MuRRBWcy7CM4yAsQUL
49G3ioCvL+i1OjYCNnX2DD1vlCC2XpYxXBZbL6WxyBupAmJIKeiz7QhcbzQZ
eix7DmT5iF2Cd0cgmjunRuvuOVD1N2O76zQC00WrPDWp5+A8eKf/chsBoq7X
dhOLGnYCrm6gDxiBWtLYkuacGtSic7tyiSNwJfCYP6c2DowbND1DekeAXm1t
yb1bHWzUX+NfDYwAx/Urn6W+qoN30zJvxvAIEBa5eoib6pDe8rq9njIC5QPi
C2kCGvCb+JNzY3YEOn2Cmb95akDiwJsam70R+Lyns1N4XBOmv/6i0pAZBR38
s18LelrYvVp/xEh+FOK8OL/NWmgB80xyzg3FUVipSFttcdICxTn9S95nR6Gt
4VCBRLQWhC2kZBTpjcKVglcPkke0QHrdQIfPehTOqsWWKFzTBu/9mRE7L0ZB
KK5T9dVFHVj3CmT6GzsKpjVF17usdODej5vP/sSPgqEPQ/Gcsw7c6jvxfCNp
FChddFJDYTpg+Do+ZiVnFJLdRNm8GnSAVyri9XTjKOSzekXtieli9/C7XN9a
RkGa9lZPioIuHDmi92aqHctHX0lSVEMXDmzSJn3uGQX6LsqjBQtdWGnwSyWP
jcLnebejhhG60GTqltW9Ogp6PKn53nO6cLbdWKxrfRT8HnxMjVnThXKV0zkd
m6PAmjPw+uWuLuTxLua27Y5CEfXq0Hk2PYidty1oOEjC7luUtcxzemDna15W
yk8Cfgnukz+e6QFTJq757UUSVMX+OSB7Qh9Ss0/LTJiSQE5V3IdDRB8UPvAm
cZuR4KJiRN2UtD5Ylu94JlqSgHVv/a84Th+KiJUSCY4kuOJpK/fEWh9Ml2Ri
Xj4lwcEnG+fsUvRhfpVvbzCUBNEc1XnF7/Xh0QaL05FIEixRqDa/ftCH93uL
2i9iSPCRNGC3XaMPW4dz/kSlkEAeF/Po36g+dm/itw6vIkGkZEbRXXo8yJxh
7e2oJcEAYf61OAseWmFP9WADCQKUB28PsOFhWe8Te2gbCbrcZslkXjzgrr0m
Ph0iAUHuN02HPB6GrUIVWkdJ0Hbga16HMh7u2nil01JIgL/r87HkHB5inC/7
PvlCglsmEifUdPEw7X9Y5vESCRRompnOmuOBEESV1LBCgs21rRuPb+CBOezn
Qap1rH4G+WGF1nhQjOn55rdNgtSwqg9td/EQmhkW73uADIf6VganCHjgySHQ
1jKQgWGmNv2+Lx6KP9i5/mUmA1duUNusPx4o5doGPuxkoHei13kRjAepDuo9
L34ysFt5t5Nj8NC9XLblL0QGIXMOSuArPDixO6yFiJLhB/v+2OMJeMi3GpyJ
lyJDmWiNFHMSHgyfBk+myJDB/rulsEMKHhZzVcey5MlQpyW8/jEND6c20rsr
VMhg2HdPh+U9ps99tQ2dJUP6+awp3mxMX52xoR3IIEZ3+QlPLqYf6f6RpE2G
9xKHDk5+wPRLRD9M6pFBcPU1bWYhpk8afz9nQAbdHD+FK8WYvqBW4uZFMqhq
HroTWIrp62293DMlg1/ptu9OGaZ/L//ZATMynFZBm7cr8MAUezPk0DUy5AT9
mqqsxPxVsT8+ZkmGD158un+rMH+TRB8+azIwCtTKSdZg/mgfeYjakOFEi0mR
Xi0eJI1n7JQcyBC0wPDcsB4PnQ9eW4MzGbhXmQ7IIzw4vDl/TdeFDCuryWoH
GvDA0Eh92cidDBJK/OodGOfOll246kmGR5ozx70b8YBnctCz8iZD87DUMEcT
Hn7I8mrY+ZKhfUbnYTrG4VcHz9z3J0N0oTMXTzMeJB4FK3gFkkEtr7/2Ccad
6aqn/Z+SIe9lofMYxg7EZbGQUDLQ2Qkqn2jB/C+nCzyPIIOj/RVRI4xz2a7y
xEeR4Qv/dZ37GONVGDlSXpCh2vZi6iOMf1iiQ1mxZAg11sL5YBwe5H6wMJ4M
WfizsrYYi+eK7qtIJMMFBjk/NYyJfeM79UlkOPJKVI4OY/vfzzfaUsnQps5q
VovFQ8+ttdKbQQbNavL2TYyzcVvfR9+TQXrXUngdy0/vTv63zzlYvW+Gf32A
8XzEzU+z+Vg80fLnZrH6hBazk5YLyRAVL4TTxliMROzfKCGDypjyRgxWT+KO
b+e/MjLc4xR26MPqby8g20JXRQZaQtb7bWx/6PVm6lhqyUDxDSlnxzjb+XUF
B8L669CdzBN1mP+X54t5m8jw3e+3z1Fsf+crqfNEWslw7PGY1k415o/WIVmx
C9tvid2JOKxfiOK8CWq9ZNC46tiAx/rJ3mjwhc4ANm8iDxuXsH7LTlR9eoVE
hgPhHjrUH/EgKsvo5PmNDH+ulARY5ePh63zfRTRLhkG/zxW2WL+/TY1Vov9B
BkVxVj8zbB5YWXn3Ja6Q4SpxY2FfJh62lmUS63bJMFaYXe2eiIeS97/96ajH
QFMCSJPxWH9bVtsa0Y7Bvn8NP5Sxef3Soyk7xTAGP9ZpJUqe46Ej/wqRlnMM
sj7dvtf0BA9BNtwF57nHQOgHa3Z8AB7UeL68jOMdA/FhezWLR5h+xF0rMeEx
ELh84WOWJx4SHXw3DOTGQMstgtvWHg+OYulCLw3HwDU1r8xDDw8iX+4wTBiN
gbCvabiwFuY/XnJFyGQMHjk/D2gBPJgeKKspNx8DwY9E6h5FPJydbb9EuTMG
6MDUu4NC2PstcymA//EYfGav7j7zVx+I10ruOASNQVh3In74tz4EsnkZfgwZ
g3un77+/tqIPG4FUnNpR2PPly8JKM/rw2Zqt0P7NGIS7sgcJ9OpDIZ/Kp8Ky
Meg72po6/FYfeonB979XjkFsXVSMX5w+LLsOUwvWjkH09WMFnNH6IN1yXySu
aQymg5giTzzRhwL79/d9+8bgrUM9raO9PuQXs9Hofx8DqkDB8RMy+pCtuSzy
lYcCTFOhkuKlekBcPFPFfZICljaqiwt5ejD/KszgsiAFvmYqHk3N0APReSEX
ojgFeGP3Widi9OB95LWqAkUK2Bzuyc120YPMEaLBQ2MKZDcM5saI60GaXYYL
exAF+mka7H9G60K3bPlzjhAK/BNbuZgUogtbf4kFnOEUiBJ9HQR+unAhenmR
Jxpb/97x601HXdiuVLkr/JYCuSlXNTm1dcGUod9asZQCuJGnmVYbOkD3YeeS
2TQFvnBIKQcY64DT2mWFt1rjkL1G3e4+rQUlF7xxk7rjEB7YOnmbpAWbuW8N
BAzGgdz+/ZhepxYE3v5mnX1xHHyN1WiXCrUgftglqtQSs1sT3+b4aEFTecRc
N2EcnPRPKa0zawHnw8bXu/njsLOkJUt9ShNa90n9szw6ASsf/IcIuuqwcdVw
S4s8Adc5b0ydz1KFmP3Z7FfiP0E2Z29f5G9ZqFURU0i/8xn6xWnNZ2/xQn3R
SvBhsUmgciufWG2nQzFXUnGukpOQ6kJJTtKnR3Y7Rtv90pMQwJP1+2PXQcSq
V+gcrTAJXzq+pPINMKHbk86mhzQnQWYqeMrT5TCiZ1ngZ7achP7hSDHe8GPI
xHGmlj52EnBbU4ePr/EjscOvPO3jJ4GYEHu56bIA2inXkiEmTgKhWWokqEoA
vafJzAhJmwQ99oAblx8Loq3Xt8LpCifhZBKdo+ARYZRMnLxK24nZpx/edlAW
Q273nh+26ZkEZRs7//QkMaTLDl3N/ZMwH1Qt+4tGHK1YJas9IWFs2S/7uUcc
aW5eF6aZmQRWuBw2ZiOJOJOYJq3nsXhEPTVGOiXRokZtQuMCFq+OoOZ3mVMo
Loqb6fEaZve1+WW+ewo5/NfV+uX3JJhlfHleflsKAcXHH/cHy5/pj6FkpxRi
D5BQSd3B4vHl5K+UkUbzwpS1vb1JSGgapLkRL43+B0FPrMk=
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{
  3.58700456220605*^9, 3.58700460151657*^9, 3.5872552863905087`*^9, {
   3.587259513697505*^9, 3.587259519953342*^9}, 3.587259583238572*^9, 
   3.5873946260835943`*^9, 3.5873981836266537`*^9, 3.587398334490034*^9, 
   3.587398871975758*^9, 3.58739895344104*^9, {3.587399014506936*^9, 
   3.5873990320992737`*^9}, 3.587399066330261*^9, 3.5874248335827703`*^9, {
   3.587424878262457*^9, 3.587424886239666*^9}, 3.58743437147219*^9, 
   3.587434470804109*^9, 3.58743507045286*^9, 3.587490846308807*^9, 
   3.587591193344626*^9, 3.587591393218856*^9, {3.587592705952969*^9, 
   3.5875927243288593`*^9}, 3.587592778823943*^9, 3.587606336054845*^9, 
   3.58760745355791*^9, 3.5876078212653017`*^9, {3.588435944968341*^9, 
   3.5884359696480913`*^9}, {3.5892208637198677`*^9, 3.589220894659648*^9}, 
   3.5892450262800083`*^9, 3.589245057328375*^9, 3.589295835895253*^9, 
   3.590251154466971*^9, 3.592227081837536*^9, 3.593103095744006*^9, {
   3.593103798509923*^9, 3.593103825537507*^9}, 3.593192660091762*^9, 
   3.5967450481015043`*^9, {3.596745089203701*^9, 3.5967451119875917`*^9}, 
   3.5967451636933403`*^9, {3.5967452120624247`*^9, 3.596745225956167*^9}, 
   3.598539216178534*^9, 3.5986208128322897`*^9, 3.598620887520278*^9, 
   3.598620918212072*^9, 3.5986214699277563`*^9, 3.598670031916806*^9, 
   3.600308538447402*^9, {3.600308626925406*^9, 3.600308642697798*^9}, 
   3.600309130616292*^9, {3.60030918263168*^9, 3.600309203511647*^9}, {
   3.600309426194748*^9, 3.600309438929575*^9}, 3.6003101441435137`*^9, 
   3.600310207461954*^9, 3.600351825599225*^9, 3.600352253408342*^9, 
   3.600352310372122*^9, 3.6003526447683573`*^9, 3.600352700842369*^9, 
   3.600444590981142*^9, 3.600444797974821*^9, 3.6004462584502983`*^9, 
   3.600447702397957*^9, 3.600447776345516*^9, 3.600447926792981*^9, 
   3.600448244548731*^9, 3.600448280425544*^9, 3.6004483271926413`*^9, {
   3.60044846647267*^9, 3.600448504614049*^9}, {3.600448543729115*^9, 
   3.600448554787612*^9}, 3.600449236801505*^9, 3.60044933332655*^9, 
   3.6005555359316483`*^9, 3.600555672402569*^9, {3.601663983618761*^9, 
   3.601663998453027*^9}, 3.601664070609157*^9, 3.6016662294129753`*^9, 
   3.602991888885902*^9, {3.6029930355253363`*^9, 3.6029930841306047`*^9}, 
   3.602993127896832*^9, 3.603033876538343*^9, 3.60312227846546*^9, 
   3.6031296096840677`*^9, {3.603129703950861*^9, 3.6031297217989264`*^9}, {
   3.603198132640305*^9, 3.603198158241776*^9}, 3.603198486985594*^9, 
   3.6032013159069147`*^9, 3.6032859354620533`*^9, 3.603329341800538*^9, 
   3.6033294494272203`*^9, 3.60337037730727*^9, 3.60337274521985*^9, 
   3.603373762864284*^9, 3.6033866213041973`*^9, 3.603396311360754*^9, 
   3.6034015031342077`*^9, 3.6034090091804533`*^9, 3.603749467242694*^9, 
   3.603901058760482*^9, 3.606650275967258*^9, 3.607062145535924*^9, 
   3.607062219939149*^9, {3.607126282212269*^9, 3.6071263098338213`*^9}, 
   3.60712655885065*^9, 3.6071304666047077`*^9, 3.607184141920722*^9, 
   3.607184185342503*^9, 3.607185247388884*^9, 3.607185706258109*^9, 
   3.607185915094939*^9, 3.607219203208212*^9, 3.6072505346601667`*^9, 
   3.607250578465172*^9, 3.6072507373167562`*^9, 3.607318217579179*^9, 
   3.607320178784686*^9, 3.6075712475145817`*^9, 3.607654935038887*^9, 
   3.6077072320217113`*^9, 3.607731763246787*^9, 3.607731888135385*^9, 
   3.6077842079016743`*^9, 3.607784287216571*^9, 3.6082521216291237`*^9, 
   3.608265060659959*^9, 3.6082653669137506`*^9, 3.608265591659555*^9, {
   3.608400490524822*^9, 3.608400518103486*^9}, 3.608477324540012*^9, 
   3.608477408676134*^9, 3.608477570897859*^9, 3.608477611922015*^9, 
   3.608643386420323*^9, 3.608661876613229*^9, 3.608680611306135*^9, 
   3.6086832178199863`*^9, 3.60868361136924*^9, 3.608683774438354*^9, 
   3.608683957021284*^9, 3.608999001413271*^9, 3.6089990325736723`*^9, 
   3.608999490010778*^9, 3.608999573423203*^9, 3.609003179303522*^9, 
   3.609003294803268*^9, 3.609003577331134*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Aout", " ", "=", " ", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"A", "/.", "y1Fit"}], "/.", "y2Fit"}], "/.", "y3Fit"}], "/.",
          "y4Fit"}], "/.", "y5Fit"}], "/.", "y6Fit"}], "/.", "y7Fit"}], "/.", 
     "y8Fit"}], "/.", "y9Fit"}], "/.", "y10Fit"}]}]], "Input",
 CellChangeTimes->{{3.585960144978483*^9, 3.585960164603569*^9}, {
   3.585960232692865*^9, 3.5859602395706997`*^9}, {3.587004633917673*^9, 
   3.5870046398931427`*^9}, {3.592227140060712*^9, 3.592227144210383*^9}, 
   3.59310313362785*^9, {3.601664077719145*^9, 3.60166407787991*^9}, {
   3.6029931404927263`*^9, 3.602993143610811*^9}, {3.6071842292803288`*^9, 
   3.6071842354926643`*^9}, {3.607316562729231*^9, 3.60731656496039*^9}, {
   3.6073182029537992`*^9, 3.607318228649898*^9}, {3.607571292754512*^9, 
   3.607571295314988*^9}, {3.608477335546835*^9, 3.608477344258985*^9}, {
   3.608643401826459*^9, 3.6086434045182667`*^9}, {3.608661847784964*^9, 
   3.608661851217615*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "0.002027850685827307`", ",", "23.605218486797533`", ",", 
     "0.0017798880461647295`", ",", "5.237812329450779`", ",", 
     "0.0005493108499327397`", ",", 
     RowBox[{"-", "7.904971130922698`"}], ",", "0.9698223149534997`"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "1.9210543609884403`"}], ",", "0.002856814765540601`", ",", 
     "9058.425963267724`", ",", "18.024688448210423`", ",", 
     "0.1381134939175042`", ",", "5.287284439826944`", ",", 
     "1.427562478202818`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.05807509111938516`"}], ",", 
     RowBox[{"-", "21.80719942437296`"}], ",", 
     RowBox[{"-", "0.0005208958559773361`"}], ",", "0.5028284409461409`", ",",
      "0.327265882985767`", ",", 
     RowBox[{"-", "4.6275103431207787`*^-10"}], ",", "0.6273359510895652`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"13.785184495417743`", ",", "0.0015002739831083893`", ",", 
     RowBox[{"-", "82633.15032069015`"}], ",", "18.14728251582313`", ",", 
     RowBox[{"-", "0.15081366584207895`"}], ",", "6.568132155783723`", ",", 
     "1.7936836268221623`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1.0582500719229313`", ",", "1.1403330196902193`", ",", 
     RowBox[{"-", "0.8580369276183655`"}], ",", 
     RowBox[{"-", "1.5251665925878324`"}], ",", "0.003843743844876461`", ",", 
     "1.9181432088777877`", ",", 
     RowBox[{"-", "0.8154101182238451`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"76.92213101783746`", ",", "0.007554662059343148`", ",", 
     RowBox[{"-", "98675.36229661653`"}], ",", "20.536810227708415`", ",", 
     "138156.48049743177`", ",", "0.015953588737225008`", ",", 
     RowBox[{"-", "138154.54556169952`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0002909299285266762`", ",", "7.2723671890185475`", ",", 
     RowBox[{"-", "0.0011715979142446454`"}], ",", "6.269432581747748`", ",", 
     "3.3132869711431545`", ",", "0.03414912849563322`", ",", 
     RowBox[{"-", "3.3629663511485774`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2.1116033871661493`*^-15", ",", "33.83516458453712`", ",", 
     RowBox[{"-", "1.1877787185148508`*^-15"}], ",", "6.430817433821772`", 
     ",", "3.358747623641173`*^-8", ",", "0.0022842911415912265`", ",", 
     RowBox[{"-", "3.358747959452097`*^-8"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"4.920740174954576`", ",", 
     RowBox[{"-", "0.6997370657985432`"}], ",", "3.5036556626480717`", ",", 
     "3.400190702657514`*^-7", ",", 
     RowBox[{"-", "4.920851100247304`"}], ",", "0.699737543361382`", ",", 
     "0.00011820302302050764`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2.230892327133782`", ",", 
     RowBox[{"-", "0.006457259320056658`"}], ",", "2347.9980825420353`", ",", 
     "22.492236103564718`", ",", "277.98735999134186`", ",", 
     "0.011919283871488454`", ",", 
     RowBox[{"-", "277.9843427170788`"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.608643404864127*^9, {3.6086618768295507`*^9, 3.608661886779196*^9}, 
   3.608680611570116*^9, 3.608683218084597*^9, 3.608683611654875*^9, 
   3.6086837747149982`*^9, 3.608683957312271*^9, 3.6089996043908377`*^9, 
   3.6090032399507437`*^9, 3.609003295120743*^9, 3.6090035909400997`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"Aout", "//", "MatrixForm"}]}]], "Input",
 CellChangeTimes->{{3.5872553282242327`*^9, 3.587255336518373*^9}}],

Cell[BoxData[
 TagBox[
  RowBox[{"(", "\[NoBreak]", GridBox[{
     {"0.002027850685827307`", "23.605218486797533`", 
      "0.0017798880461647295`", "5.237812329450779`", 
      "0.0005493108499327397`", 
      RowBox[{"-", "7.904971130922698`"}], "0.9698223149534997`"},
     {
      RowBox[{"-", "1.9210543609884403`"}], "0.002856814765540601`", 
      "9058.425963267724`", "18.024688448210423`", "0.1381134939175042`", 
      "5.287284439826944`", "1.427562478202818`"},
     {
      RowBox[{"-", "0.05807509111938516`"}], 
      RowBox[{"-", "21.80719942437296`"}], 
      RowBox[{"-", "0.0005208958559773361`"}], "0.5028284409461409`", 
      "0.327265882985767`", 
      RowBox[{"-", "4.6275103431207787`*^-10"}], "0.6273359510895652`"},
     {"13.785184495417743`", "0.0015002739831083893`", 
      RowBox[{"-", "82633.15032069015`"}], "18.14728251582313`", 
      RowBox[{"-", "0.15081366584207895`"}], "6.568132155783723`", 
      "1.7936836268221623`"},
     {"1.0582500719229313`", "1.1403330196902193`", 
      RowBox[{"-", "0.8580369276183655`"}], 
      RowBox[{"-", "1.5251665925878324`"}], "0.003843743844876461`", 
      "1.9181432088777877`", 
      RowBox[{"-", "0.8154101182238451`"}]},
     {"76.92213101783746`", "0.007554662059343148`", 
      RowBox[{"-", "98675.36229661653`"}], "20.536810227708415`", 
      "138156.48049743177`", "0.015953588737225008`", 
      RowBox[{"-", "138154.54556169952`"}]},
     {"0.0002909299285266762`", "7.2723671890185475`", 
      RowBox[{"-", "0.0011715979142446454`"}], "6.269432581747748`", 
      "3.3132869711431545`", "0.03414912849563322`", 
      RowBox[{"-", "3.3629663511485774`"}]},
     {"2.1116033871661493`*^-15", "33.83516458453712`", 
      RowBox[{"-", "1.1877787185148508`*^-15"}], "6.430817433821772`", 
      "3.358747623641173`*^-8", "0.0022842911415912265`", 
      RowBox[{"-", "3.358747959452097`*^-8"}]},
     {"4.920740174954576`", 
      RowBox[{"-", "0.6997370657985432`"}], "3.5036556626480717`", 
      "3.400190702657514`*^-7", 
      RowBox[{"-", "4.920851100247304`"}], "0.699737543361382`", 
      "0.00011820302302050764`"},
     {"2.230892327133782`", 
      RowBox[{"-", "0.006457259320056658`"}], "2347.9980825420353`", 
      "22.492236103564718`", "277.98735999134186`", "0.011919283871488454`", 
      RowBox[{"-", "277.9843427170788`"}]}
    },
    GridBoxAlignment->{
     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
      "RowsIndexed" -> {}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[0.7]}, 
        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
  Function[BoxForm`e$, 
   MatrixForm[BoxForm`e$]]]], "Output",
 CellChangeTimes->{
  3.587435083449821*^9, 3.587490861436418*^9, 3.587591401866592*^9, 
   3.587592790267997*^9, 3.5876063459976387`*^9, 3.587607469808279*^9, {
   3.587607514630495*^9, 3.5876075428612947`*^9}, 3.587607828113976*^9, 
   3.588435976972519*^9, 3.589220917111987*^9, 3.5892450736359177`*^9, 
   3.589295849973817*^9, 3.5902511665430117`*^9, 3.5922271503852797`*^9, {
   3.5931031274956007`*^9, 3.593103136495325*^9}, 3.5931038329638433`*^9, 
   3.593192694096758*^9, 3.5967452370112333`*^9, 3.5985392365720987`*^9, 
   3.598621015209547*^9, 3.598670047876528*^9, 3.600308664379648*^9, 
   3.6003092380045233`*^9, 3.600310168525681*^9, 3.600310219237895*^9, 
   3.600351860962281*^9, 3.600352277044346*^9, 3.6003527210975113`*^9, 
   3.6004448181933413`*^9, 3.600447940029519*^9, 3.600448255215583*^9, 
   3.600448287440317*^9, 3.6004483470706053`*^9, 3.600448511713705*^9, 
   3.600448561966037*^9, 3.600449341449966*^9, 3.600555552988983*^9, 
   3.6005556784496937`*^9, 3.6016640801938553`*^9, 3.601666233875422*^9, 
   3.602991897585144*^9, 3.6029931665131598`*^9, 3.603033885764773*^9, 
   3.603122284992334*^9, 3.60312973075916*^9, 3.6031981660678053`*^9, 
   3.603198489240897*^9, 3.603201316048882*^9, 3.603285941231515*^9, 
   3.603329346850746*^9, 3.603329455158293*^9, 3.6033703817105503`*^9, 
   3.603372750515545*^9, 3.60337376768638*^9, 3.6033866251090593`*^9, 
   3.603396316025097*^9, 3.603409013252968*^9, 3.6037494729947*^9, 
   3.603901071024501*^9, 3.606650282630989*^9, 3.60718423850079*^9, 
   3.6071852475109587`*^9, 3.607185706387467*^9, 3.6071859152821417`*^9, 
   3.607219212096888*^9, 3.60725053510387*^9, 3.607250578609515*^9, 
   3.60725073752151*^9, {3.6073182178354263`*^9, 3.6073182309966307`*^9}, 
   3.607320179022777*^9, 3.607571297380728*^9, 3.607654957816334*^9, 
   3.607707232206944*^9, 3.607731763589486*^9, 3.607731888378612*^9, 
   3.6077842081658907`*^9, {3.6077842875548983`*^9, 3.607784317513338*^9}, 
   3.608252162233797*^9, 3.608265060807982*^9, 3.6082653670588913`*^9, 
   3.6082655918011227`*^9, 3.6084005375796213`*^9, 3.608477346233371*^9, 
   3.608477612356166*^9, 3.608643407627544*^9, {3.608661876891018*^9, 
   3.608661889817336*^9}, 3.60868061161517*^9, 3.608683218119413*^9, 
   3.608683611717847*^9, 3.608683774768208*^9, 3.608683957354197*^9, 
   3.608999606345311*^9, 3.6090032416844807`*^9, 3.609003295159624*^9, 
   3.6090035937683277`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], "\n", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<A_fit_single.mat\>\"", ",", 
   RowBox[{"\"\<a_fit\>\"", "\[Rule]", "Aout"}], ",", "\"\<LabeledData\>\""}],
   "]"}]}], "Input",
 CellChangeTimes->{{3.58596024159552*^9, 3.585960249282199*^9}, {
   3.587004504749566*^9, 3.587004516699597*^9}, {3.587259538487855*^9, 
   3.587259564734943*^9}, {3.587394716125042*^9, 3.587394716625906*^9}, {
   3.5873990916546087`*^9, 3.587399096507112*^9}, {3.587424931827242*^9, 
   3.587424933098358*^9}, {3.587434485880265*^9, 3.5874344863954268`*^9}, {
   3.587435090433296*^9, 3.5874350905929337`*^9}, {3.5874908671658297`*^9, 
   3.587490881624868*^9}, {3.5875914077063637`*^9, 3.587591408777439*^9}, {
   3.587592798489581*^9, 3.587592799527295*^9}, {3.589220929038492*^9, 
   3.5892209305405273`*^9}, 3.589245078107973*^9, {3.59310314260034*^9, 
   3.593103143661633*^9}, {3.5985392459836197`*^9, 3.5985392524624977`*^9}, {
   3.600308671616781*^9, 3.6003086728964567`*^9}, 3.600309243137163*^9, {
   3.600310173162318*^9, 3.6003101733776407`*^9}, {3.6003102246022253`*^9, 
   3.600310224745722*^9}, {3.600352724688222*^9, 3.6003527248473587`*^9}, 
   3.600444857701993*^9, 3.600447953790935*^9, {3.6004482959715977`*^9, 
   3.6004482960958767`*^9}, {3.600448515104391*^9, 3.600448515226272*^9}, {
   3.600448588897298*^9, 3.600448589029007*^9}, 3.600448867176724*^9, 
   3.600449345978718*^9, {3.6005555607086687`*^9, 3.600555594477702*^9}, {
   3.603122290229525*^9, 3.6031223001633244`*^9}, {3.607185674806904*^9, 
   3.6071856905382957`*^9}, {3.6071857387634706`*^9, 
   3.6071857472476797`*^9}, {3.607571303811308*^9, 3.607571309059167*^9}, {
   3.607654964528687*^9, 3.6076549677368317`*^9}, {3.607707223747484*^9, 
   3.607707225177988*^9}, {3.608400541093212*^9, 3.608400542243993*^9}, {
   3.608477402320973*^9, 3.608477403849361*^9}, {3.6089996095839453`*^9, 
   3.6089996112138*^9}, {3.609003246191329*^9, 3.6090032500946207`*^9}, {
   3.6090035995363417`*^9, 3.609003601224338*^9}}],

Cell[BoxData["\<\"A_fit_single.mat\"\>"], "Output",
 CellChangeTimes->{{3.603122300774159*^9, 3.603122303446727*^9}, 
   3.603129733071968*^9, 3.603198167464966*^9, 3.603198490445363*^9, 
   3.6032013201870823`*^9, 3.6032859440766487`*^9, 3.603329348268935*^9, 
   3.603329456292583*^9, 3.603370382498363*^9, 3.603372752138294*^9, 
   3.603373768343079*^9, 3.6033866259573603`*^9, 3.6033963169840317`*^9, 
   3.603409014513968*^9, 3.603749474198691*^9, 3.6039010722296343`*^9, 
   3.606650283847538*^9, 3.60718424137297*^9, 3.607185247557557*^9, 
   3.607185706487269*^9, 3.607185915321681*^9, 3.607219216423676*^9, 
   3.607250535240596*^9, 3.6072505786268473`*^9, 3.60725073755602*^9, {
   3.607318217898877*^9, 3.6073182320841837`*^9}, 3.60732017907084*^9, 
   3.6075713096563253`*^9, {3.607654960597663*^9, 3.6076549704174*^9}, 
   3.6077072322765417`*^9, 3.60773176364535*^9, 3.607731888417531*^9, 
   3.607784208220354*^9, 3.607784287601873*^9, 3.607784320321892*^9, 
   3.608252165189784*^9, 3.6082650608276367`*^9, 3.608265367093137*^9, 
   3.608265591816983*^9, 3.6084005426909103`*^9, 3.608477347957678*^9, 
   3.6086434117685137`*^9, {3.608661876952409*^9, 3.608661891917968*^9}, 
   3.608680611680838*^9, 3.608683218161377*^9, 3.608683611784602*^9, 
   3.6086837748288307`*^9, 3.608683957399769*^9, 3.608999611567416*^9, 
   3.609003256766659*^9, 3.6090036015900917`*^9}]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.60299190656855*^9, 3.602991909446082*^9}}]
},
WindowSize->{1855, 1056},
WindowMargins->{{Automatic, 13}, {Automatic, 0}},
FrontEndVersion->"8.0 for Linux x86 (64-bit) (November 7, 2010)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 200, 4, 30, "Input"],
Cell[782, 28, 2477, 35, 30, "Output"]
}, Open  ]],
Cell[3274, 66, 713, 15, 50, "Input"],
Cell[3990, 83, 5722, 148, 202, "Input"],
Cell[CellGroupData[{
Cell[9737, 235, 1454, 25, 30, "Input"],
Cell[11194, 262, 8232, 205, 88, "Output"]
}, Open  ]],
Cell[19441, 470, 2415, 66, 58, "Input"],
Cell[21859, 538, 942, 27, 30, "Input"],
Cell[CellGroupData[{
Cell[22826, 569, 214, 4, 30, "Input"],
Cell[23043, 575, 1981, 54, 30, "Output"]
}, Open  ]],
Cell[25039, 632, 2958, 87, 106, "Input"],
Cell[CellGroupData[{
Cell[28022, 723, 5990, 149, 202, "Input"],
Cell[34015, 874, 3358, 64, 30, "Output"],
Cell[37376, 940, 3345, 63, 30, "Output"],
Cell[40724, 1005, 3407, 64, 33, "Output"],
Cell[44134, 1071, 3363, 63, 30, "Output"],
Cell[47500, 1136, 3391, 65, 30, "Output"],
Cell[50894, 1203, 747, 13, 43, "Message"],
Cell[51644, 1218, 3369, 64, 30, "Output"],
Cell[55016, 1284, 3369, 63, 30, "Output"],
Cell[58388, 1349, 3380, 63, 33, "Output"],
Cell[61771, 1414, 747, 13, 43, "Message"],
Cell[62521, 1429, 3366, 63, 33, "Output"],
Cell[65890, 1494, 3368, 62, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[69295, 1561, 5868, 158, 202, "Input"],
Cell[75166, 1721, 21581, 350, 233, "Output"],
Cell[96750, 2073, 14908, 241, 244, "Output"],
Cell[111661, 2316, 22057, 358, 235, "Output"],
Cell[133721, 2676, 15630, 253, 237, "Output"],
Cell[149354, 2931, 13728, 221, 233, "Output"],
Cell[163085, 3154, 18941, 306, 237, "Output"],
Cell[182029, 3462, 16713, 270, 233, "Output"],
Cell[198745, 3734, 10601, 170, 235, "Output"],
Cell[209349, 3906, 10014, 160, 233, "Output"],
Cell[219366, 4068, 20336, 329, 236, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[239739, 4402, 1091, 23, 30, "Input"],
Cell[240833, 4427, 3305, 66, 117, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[244175, 4498, 166, 3, 50, "Input"],
Cell[244344, 4503, 5247, 94, 191, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[249628, 4602, 2098, 32, 50, "Input"],
Cell[251729, 4636, 1383, 19, 30, "Output"]
}, Open  ]],
Cell[253127, 4658, 91, 1, 30, "Input"]
}
]
*)

(* End of internal cache information *)
